Dropdown Boxes

[rcollins]

I have 2 dropdown boxes on my form, both which pull from table I made for each. First I select the Service that I want, then I want the Service Type to be limited to the types only with the Service ID that matches the ID from the first box. How do I implement this?

[tara99]

I have 2 dropdown boxes on my form, both which pull from table I made for each. First I select the Service that I want, then I want the Service Type to be limited to the types only with the Service ID that matches the ID from the first box. How do I implement this?

Try something like this behind your combo box's row source

SELECT table.servicetype FROM table table.service HAVING (((table.service)=forms!YourformName!Sevice-Combobox-name)); 
 

[rcollins]

SELECT table.tblServic eType FROM table table.tblServic e HAVING (((table.tblSer vice)=forms!frm Main!Combo24));
I think i changed this right. Here are the names I am using for the different items:
Tables are
tblService
tblServicetype
Form is
frmMain
Combo box is
Combo24
this is not an extensive database, this shouldnt be to hard to do. When I modified what you gave me, I have nothing in the Service type box

[missinglinq]

This concept is called Cascading Comboboxes. Here's a fairly good explanation and example code:

http://www.mvps.org/access/forms/frm0028.htm

[rcollins]

Very good example. The only problem is that now I have the ID showing in the second dropdown, not hte ServiceType.

[MMcCarthy]

Very good example. The only problem is that now I have the ID showing in the second dropdown, not hte ServiceType.

You need to change the column widths property to hide the ID and make sure your column count = 2.

Column Count 2
Column Widths 0cm; 3cm (For example)

Mary

[rcollins]

Here is what I have done, Now it doesn't work at all.
From the website sent to in previous post
Private Sub Combo24_AfterUp date()
Dim strSQL As String
strSQL = "Select " & Me!Combo24
strSQL = strSQL & " from Categories"
Me!Combo46.RowS ourceType = "Table/Query"
Me!Combo46.RowS ource = strSQL
End Sub
Combo24 is my first box and 46 my second
Then put this in row source of Combo46
Select ServiceIDID, Service from tblService Where ServiceID= Forms!frmMain!C ombo24;
Then in after update of Combo 24 put
Private Sub Combo24_AfterUp date()
Me!Combo46.Requ ery
End Sub
This isnn't working. Contact by email if easier, I am supposed to have this database finished today and this is all that is left. Thanks for helping. [e-mail] sol.net

[MMcCarthy]

   strSQL = "Select " & Me!Combo24
   strSQL = strSQL & " from Categories"
    Me!Combo46.RowSourceType = "Table/Query"
    Me!Combo46.RowSource = strSQL
 

This doesn't make sense. Me!Combo24 is a value not a field name. You can't select a value from a Table

Mary

[rcollins]

Thank you for your responce. I actually had to change some things in my database, but I got it to work following an examlpe that I found online. Thanks

[MMcCarthy]

Thank you for your responce. I actually had to change some things in my database, but I got it to work following an examlpe that I found online. Thanks

No problem

I'm glad you got it working

Merry Christmas

Mary