need help with cascading combo/list boxes

Originally Posted by pouj

thank you so much you saved my life!!!!! also i didnt know it was called cascading combo box.

Originally Posted by pouj

okay so i read over cascading combo/list boxes tutorial and my projct doesnt work.

i will tell you exactly what i have done...

my first table called tblcontractor..
has 2 field
ID: Automatic
ContractorIDNumber: Number (which gets its data from another table)

my next table called tblcontractorproject
has 3 fields
ID: autonumber
Contractorprojectname: text
contractoridnumber: Number (which gets i data from same table that tblcontracot contractoridnumber gets it data)

then i create a form and then form i drop the the tables in there..and i went to properties and i went to afterupdate and i put in [Event Procedure] and i went to VB editor and i type this in there...

Private Sub ContractorIDNumber_AfterUpdate()
With Me![ContractorIDNumber]
If IsNull(Me!ContractorIDNumber) Then
.RowSource = ""
Else
.RowSource = "SELECT [Contractorprojectname] " & _
"FROM Tblcontractproject " & _
"WHERE [ID]=" & Me!ContractorIDNumber
End If
Call .Requery
End With
End Sub

also keep in mind that i have no data in the tables yet. so if you tell me what i am doing wrong here, i would apperciate it.

Originally Posted by Rabbit

When you're doing a cascading combo box you use more than 1 combo box. You're only using one combo box here. Read the tutorial more closely.

You're also attempting to return records based what looks to be a primary key when you should be using a foreign key.

Originally Posted by pouj

how do i use foreign key....and i am using 2 combo box.

Originally Posted by pouj

i did exactly step by step of what you did. my whole problem is with

With Me![Employee]

Originally Posted by pouj

okay i will tell you step by step what i have done

i have 2 tables
one is called
tblcompany
and other is called tblemployee

in tblcompany
i got 2 fields
one is ID which is automatic and primary key
and other one is cpyname

then in tblemployee
i got 3 fields
ID which is automatic number and primary key
empname which is text
and EID which is i did lookup wizard to make relationship with ID from tblcompany (i might no idea how to set up foreign key)

then i created a blank form
and drop the fields cpyname and empname

and i changed them both dropbox.
and i put in all the control source and row source and column count a you stated.

and then i went to after update and i put in event procedure and in visual basic i put in this code


Private Sub cpyname_AfterUpdate()
With Me![Employee]
If IsNull(Me!company) Then
.RowSource = ""
Else
.RowSource = "select [empname] " & _
"from tblemployees " & _
"where [id] =" & Me!company
End If
Call .Requery
End With
End Sub

so what i am doing wrong and where?

i gaved as much details as i could. so i hope this helps

Originally Posted by pouj

okay i finally got your tutorial to work.
okay but now...this is what i am want to do for school project.

I have to set up this cascadog combo/list boxs
basically
they way you would say it english would be like this

if value in combobox1 is Available (combo box choices are available, on project, vacatio)
then search the table1 for anyone with Available status and list them in combobox.

thats how it should be done....if not possible what is my choice.