sk1hotpepr
Technical User
I have two combo boxes to filter records - upgraded to access project (adp) with sql server backend. everything works fine as the database owner, but if I try to do the same thing on a user station with connectivity only - i don't get any records with the filter. does anyone know why? i'm just learning as i go...
the first combo box has a value list of the alphabet
the second combo box uses an inline function as it's rowsource.
the first combo box has a value list of the alphabet
the second combo box uses an inline function as it's rowsource.
Code:
Private Sub cmbLetter_AfterUpdate() 'first combo box
Me.cmbLookup.Requery
Me.cmbLookup.SetFocus
End Sub
Private Sub cmbLookup_Change() 'second combo box
Dim stLink As String
Dim stDocName As String
stDocName = "ProjectInformationFormMain"
Me.cmbLookup.SetFocus
stLink = Me.cmbLookup.Text
DoCmd.OpenForm stDocName, acNormal
Forms![ProjectInformationFormMain]!ProjectNumber.SetFocus
DoCmd.FindRecord stLink
DoCmd.Close acForm, "FormLookup"
End Sub
Private Sub cmbLookup_GotFocus() 'second combo box
If IsNull(cmbLetter) Then
MsgBox "Please Choose A Letter"
Me.cmbLetter.SetFocus
End If
End Sub