asked on
Help with DCount Syntax
I am using Dcount to look if a field (CL - String) in a table has a particular date of another field (DiscoDiag - Date) in MS Access 2003.
I'm testing with the following VBA line but getting an error. I believe its just my syntax or placement of quotes. I want to put up a message when the date of DiscoDiag is after todays date. Any help is appreciated.
If DCount("*", "tCl", "CL = """ & sFindODBrand & """ And DiscoDiag < Now()""") > 0 Then MsgBox "BAM!"
I'm testing with the following VBA line but getting an error. I believe its just my syntax or placement of quotes. I want to put up a message when the date of DiscoDiag is after todays date. Any help is appreciated.
If DCount("*", "tCl", "CL = """ & sFindODBrand & """ And DiscoDiag < Now()""") > 0 Then MsgBox "BAM!"
Microsoft AccessVBA
Last Comment
thandel
ASKER CERTIFIED SOLUTION
THIS SOLUTION ONLY AVAILABLE TO MEMBERS.
View this solution by signing up for a free trial.
Members can start a 7-Day free trial and enjoy unlimited access to the platform.
You didn't tell us what the error message was. The best technique for creating strings like this Where clause is to build it into a variable so that you can view the completed string when you get an error.
Dim strWHERE as string
strWHERE = "CL = """ & sFindODBrand & """ And DiscoDiag < Now()"""
If DCount("*", "tCl", strWHERE) > 0 Then MsgBox "BAM!"
Dim strWHERE as string
strWHERE = "CL = """ & sFindODBrand & """ And DiscoDiag < Now()"""
If DCount("*", "tCl", strWHERE) > 0 Then MsgBox "BAM!"
ASKER
Thanks!
Open in new window