Display Message 'No Data' for a Query

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is there a way to display a message 'No Data' for a query similar to what can
be done with a report?

Thanks, Jani
 
Yes, If you open a recordset on the query and read the first record. If you
hit eof on the first read, its empty and you can put out your message.

-Dorian
 
Dorian, thanks for the reply but I don't understand your message. Can you
explain further. If the query produces no records, I want a message displayed
- not a blank record. Thanks! Jani
 
Hi,
use the dcount function to check if the query has data or not, based on that
evaluation you can give your message:

If Dcount("*","YourQuery") = 0 Then
Msgbox("No data!")
End If

HTH
Good luck
 
Is there a way to display a message 'No Data' for a query similar to what can
be done with a report?

Thanks, Jani
Click to expand...

Not if you are opening the query itself directly from the main
database folder.
However, if you create a form, using the query as it's record source,
you can code the Form's Open event:

If Me.RecordsetClone.RecordCount = 0 Then
MsgBox "No records"
Cancel = True ' Optional
End If

Open the Form.
The form will display your message and not open if there are no
records.
Set the Form's DefaultView property to Datasheet.
It will look just like the query datasheet.
 
Back
Top