Blank Form

[jo15765]

I have an a textarea, which allows for a double click, and when double clicked will launch a secondary form passing a userid. That userid is then passed to a query, which will run and return data to the secondary form as the control source. This works 99% of the time, but in the rarity the secondary form will be blank, and I can not discover why!



These are the basics that may (or may not) help diagnose what is causing my problem.

Private Sub grrrrrr_DblClick()
  Dim cid As Integer
  cid = List0
  gCurrentIndex = List0.ListIndex
  DoCmd.OpenForm "form2", acNormal, , "masterinfo.employeeID=" & cid
  DoCmd.Close acForm, "form1", acSaveNo
End Sub

And the basics for form2
--getuserinfo is a query which returns data for id 9999 just the form is blank?
RecordSource = getuserinfo
Filter = masterinfo.employeeID = 9999

[ItsMe]

It seems the Filter you are applying to the Form produces zero records.

[jo15765]

It seems the Filter you are applying to the Form produces zero records.

But it should produce records. As if I manually run the query that the form is based off of the query returns the relevant data set.

[ItsMe]

Well, you could open the form without the Filter criteria and display the value of cid in a msg box. Then you could use the Right Click Context Menu to apply the value displayed in the msgbox to the form's Filter property.

Dim cid As Integer
cid = List0
MsgBox cid
gCurrentIndex = List0.ListIndex
'  DoCmd.OpenForm "form2", acNormal, , "masterinfo.employeeID=" & cid
DoCmd.OpenForm "form2", acNormal
DoCmd.Close acForm, "form1", acSaveNo