One of the ways, is using the on no data event of the report.
[tt]msgbox "The criteria you input returns no records."
cancel = true[/tt]
Then in the calling form, include some handling to trap the 2501 error:
[tt]on error goto myerr
docmd.openreport "myrpt"...
myexit:
exit sub
myerr:
if (err.number<>2501) then
msgbox err.description
end if
resume myexit
end sub[/tt]
Roy-Vidar