Blank form

[markyboy171]

Im Sure you have all heard this before but this is slightly different. I have textboxes bound to a query but when the query returns no results the form will go blank. I hate navigating to a blank record so i cant just set allow additions to "YES"(This does solve the problem BTW). How can i catch this bug so it will not make my form blank when no records are returned



Thanks in advance

[pbaldy]

If you want to stop the form opening, in the code that opens it test the query with DCount() and only open the form if the result is greater than 0.

[Missinglinq]

You say what you do not want to happen, but you don't really say what you do want to happen, if the RecordSet is empty.

To simply pop a message and close the Form, as Paul suggested, without the Form showing up

Private Sub Form_Open(Cancel As Integer)

Dim Msg As String
Dim intX As Integer

intX = DCount("[YourPKField]", "YourTableName")
 If intX < 1 Then
   
   DoCmd.Close acForm, "YourFormName"
   
   Msg = "There Were No Records Returned By This Query"
   
   MsgBox Msg, vbOKOnly + vbInformation
     
End If

End Sub

Linq ;0)>