3 Cascading Combo Boxes

[qdata]

Hi guys any idea how to cascade 3 combo boxes. I know how to do two but just cant get three to work. What I'd like to achieve is first combo box=country, second combo box=city, third combo box=Hotel.
Thank you

 

[jdraw]

There is a free video tutorial here
http://www.datapigtechnologies.com/flashfiles/combobox2.html

There are other tutorials at the site.

 

[Simon_MT]

This is how I something like this for Region to Country to be flexible these are all functions obviously you have another tier.

Function LookupCountryRegion()
    With Screen.ActiveControl
        .RowSource = "SELECT [Countries Regions].[Country Region], [Countries Regions].[Country Region Desc], [Countries Regions].[Country Region Sort] FROM [Countries Regions] ORDER BY [Countries Regions].[Country Region Sort];"
        Call ListDisplay
    End With
End Function

Function LookupCountry()
Dim MyControl As Control
        Set MyControl = Screen.ActiveControl
    With CodeContextObject
        MyControl.RowSource = "SELECT CountriesQuery.Country, CountriesQuery.[Country Desc], CountriesQuery.[Country Region Ref] FROM CountriesQuery WHERE CountriesQuery.[Country Region Ref]= '" & .[Region] & "' ORDER BY CountriesQuery.[Country Desc];"
        Call ListDisplay
    End With
End Function

Function ClientsDialogueOverseas_CountryEnter()
    DoCmd.Requery "Country"
    Call LookupCountry
End Function

Simon

 

[qdata]

Hi jdraw and Simon MT. Thank you so much for your help.You guys Rock!!!