i just added to my forms that use Quires
Private Sub Form_Open(Cancel As Integer)
If Me.RecordsetClone.RecordCount = 0 Then
MsgBox "ERROR: There are zero records in the data source!", vbInformation, "No Records Found"
DoCmd.Close acForm, Me.Name
End If
Problem is this...