Return "No Matching Records"

[slickdock]

I have a form based on a query. When it opens, if the underlying query has no
records, I have a macro that conditionally uses DCount("*","frmCalendar1")=0
to successfully display the MsgBox "No Matching Records," then closes the
form.

Problem:
I have another form that is filtered by an underlying query PLUS an
additional filter name. How can I test for no matching records?

Thank you.

 

[Mike Painter]

I have a form based on a query. When it opens, if the underlying
query has no records, I have a macro that conditionally uses
DCount("*","frmCalendar1")=0 to successfully display the MsgBox "No
Matching Records," then closes the form.

Problem:
I have another form that is filtered by an underlying query PLUS an
additional filter name. How can I test for no matching records?

Thank you.

DCount("*","frmCalendar1", " Something = [ThisRecords] AND some other
criteria.")

I'm assuming the macro can handle conditions, if not switch to code.

 

[slickdock]

The problem is I don't know what the second "something" might be. Maybe the
user will have filtered by selection, or filter excluding selection. How can
I add the form's current filter property to the dcount expression?

I have a form based on a query. When it opens, if the underlying
query has no records, I have a macro that conditionally uses
DCount("*","frmCalendar1")=0 to successfully display the MsgBox "No
Matching Records," then closes the form.

Problem:
I have another form that is filtered by an underlying query PLUS an
additional filter name. How can I test for no matching records?

Thank you.

DCount("*","frmCalendar1", " Something = [ThisRecords] AND some other
criteria.")

I'm assuming the macro can handle conditions, if not switch to code.


.