Dear All
Double click on list box I am trying to open a form for particular record. Although form gets open but without any data (blank). I am using the following code:
Private Sub lstMatter_DblClick(Cancel As Integer)
DoCmd.OpenForm "frmClientMatter", , , "[ClientID]=" & Me.lstMatter & " and [MatterID]=" & Me.lstMatter
End Sub
List box derives its data through this line of code from lstClient:
Private Sub lstClient_Click()
Me.lstMatter.Visible = True
Me.lstMatter.RowSource = "SELECT ClientID, MatterID, Address, TypeDesc, MatterStatus, AgreedPrice FROM" & _
" qryAlphaClientMatter WHERE ClientID = " & Me.lstClient & _
" Order By ClientID"
End Sub
Any help or suggestion will be highly appreciated.
Double click on list box I am trying to open a form for particular record. Although form gets open but without any data (blank). I am using the following code:
Private Sub lstMatter_DblClick(Cancel As Integer)
DoCmd.OpenForm "frmClientMatter", , , "[ClientID]=" & Me.lstMatter & " and [MatterID]=" & Me.lstMatter
End Sub
List box derives its data through this line of code from lstClient:
Private Sub lstClient_Click()
Me.lstMatter.Visible = True
Me.lstMatter.RowSource = "SELECT ClientID, MatterID, Address, TypeDesc, MatterStatus, AgreedPrice FROM" & _
" qryAlphaClientMatter WHERE ClientID = " & Me.lstClient & _
" Order By ClientID"
End Sub
Any help or suggestion will be highly appreciated.