Solved

Multiple Selections write record for each selection

Posted on 2012-03-29
11
289 Views
Last Modified: 2012-07-16
Our purchasing department wants a database created based on multiple vendor's contacts selected.  I have created the form that they are requesting but I am not sure how to create a drop down list to select the vendors, then have the form list the contacts associated to the vendors selected.  The purchaser than can select the contacts they want to email and have the form save each record in the database by vendor.  

I know I can use a list box with multi select set to simple or extended and use duplicate record but how do I duplicate by the vendor selected.

Hopefully this makes sense.....

Attached sample would be great!!
0
Comment
Question by:CompTech810
  • 4
  • 3
  • 2
  • +1
11 Comments
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
you can use a combo box (cboVendor) and a list box (lstContacts allow multiselect - simple)
* in the after update event of the combo box (cboVendor) set the rowsource of the listbox

private sub cboVendor_afterupdate()

dim sql as string
sql="select contacts from tblVendor where vendorId= " & me.cboVendor

me.lstContacts.rowsource=sql

end sub


post back if you have any question..
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
set the rowsource of the cboVendor to

Select VendorID, VendorName from tblVendors

set the following properties of the combo

Column Count 2
Bound Column 1
Column Widths 0";1"
0
 
LVL 61

Assisted Solution

by:mbizup
mbizup earned 166 total points
Comment Utility
Are you familiar with using subforms?
http://office.microsoft.com/en-us/access-help/create-a-form-that-contains-a-subform-a-one-to-many-form-HA010098674.aspx

It sounds like you should have a mainform (Vendors -'one')

And a subform (contacts - 'many')

If you follow the tutorial, your subform Contact records will automatically include the vendor (or vendor ID when saved).

To search/filter for a particular vendor from a combo on the mainform you would use the following in the AfterUpdate event of your combo:

Me.Filter = "Vendor ='" & me.cboVendor & "'"

Or if an ID (numeric) is being stored:

Me.Filter = "VendorID =" & me.cboVendor.Column(0)  '<-- assumes the Vendor ID is in the fist column of the combo
Me.FilterOn = True

Open in new window

With that combo, finding the vendor spcified, your subform records will automatically show the contacts associated with that vendor, and allow you to add new contact records that are automatically associated with that specific vendor.
0
 
LVL 39

Assisted Solution

by:als315
als315 earned 334 total points
Comment Utility
I agree with mbizup. May be this example can help you
DBcontacts.mdb
0
 
LVL 39

Accepted Solution

by:
als315 earned 334 total points
Comment Utility
You can also add new contacts if default value of vendorID field in contacts subform will be set to vendorID from vendors subform
DBcontacts.mdb
0
Free Gift Card with Acronis Backup Purchase!

Backup any data in any location: local and remote systems, physical and virtual servers, private and public clouds, Macs and PCs, tablets and mobile devices, & more! For limited time only, buy any Acronis backup products and get a FREE Amazon/Best Buy gift card worth up to $200!

 
LVL 2

Author Comment

by:CompTech810
Comment Utility
Some really good examples!  It is a many to many relationship.  The purchaser wants to be able to select multiple vendors then select multiple contacts for those vendors to email RFQ's to.  Then the main RFQ file needs to be updated by the number of vendors selected so there is only one RFQ form filled out but a record written for each vendor selected.
0
 
LVL 61

Expert Comment

by:mbizup
Comment Utility
Just making sure that I'm following...

Your structure looks like this:

Main (RFQ - one) ----->  Vendors (Many/RFQ)  ----> Contacts (Many per Vendor)


So your mainform (RFQ) would have a child form (Vendors)  and a 'grandchild'  form (Contacts)

Take a look at the sample and the solution posted by the Original Poster in this thread:

http://www.experts-exchange.com/Microsoft/Development/MS_Access/Q_27512608.html
0
 
LVL 2

Author Comment

by:CompTech810
Comment Utility
Mbizup, als315.   It looks like the example that als315 provided would work because of the query to select a Vendor than select the email, select another vendor then select email, and so on.  Now, on to figuring out how to create a duplicate RFQ record for each vendor selected and then create an email for each contact....
0
 
LVL 39

Expert Comment

by:als315
Comment Utility
Can you show example of expected RFQ record?
0
 
LVL 2

Author Comment

by:CompTech810
Comment Utility
I'm still working on closing this question but because of my lack of knowledge with VBA I'm stuck.

How do I create a simple loop to loop through a query that is based on selected contacts and print an email for each.  I have been able to get Access to do the emails with atachments but because I'm not familiar with VBA I think I'm confusing the system reserved words with what to use:  exp.  I see that people are using: Dim db As DAO.Database Dim rs As DAO.Recordset etc.....
0
 
LVL 2

Author Closing Comment

by:CompTech810
Comment Utility
I thought I closed this.  Thanks all!
0

Featured Post

Enabling OSINT in Activity Based Intelligence

Activity based intelligence (ABI) requires access to all available sources of data. Recorded Future allows analysts to observe structured data on the open, deep, and dark web.

Join & Write a Comment

This article is a continuation or rather an extension from Cascading Combos (http://www.experts-exchange.com/A_5949.html) and builds on examples developed in detail there. It should be understandable alone, but I recommend reading the previous artic…
It took me quite some time to sort out all the different properties of combo and list boxes available from Visual Basic at run-time. Not that the documentation is lacking: the help pages are quite thorough and well written. The problem was rather wh…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
In Microsoft Access, learn how to use Dlookup and other domain aggregate functions and one method of specifying a string value within a string. Specify the first argument, which is the expression to be returned: Specify the second argument, which …

743 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now