I have the following code, failing on the last line:
DateOfVisit = CDate(Forms!Select_Diagnosis![VisitList])
Set db = CurrentDb
Set rs = db.OpenRecordset(Domain)
'select all events
strSQL = "SELECT * FROM [diagnosis] WHERE (CDate(StartDate)) >" & DateOfVisit
If someone can see my error, I will be very grateful.
Thank you,
Patty
--
Patricia Mapes
--
Patricia Mapes
__._,_.___
| Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (1) |
.
__,_._,___
Tidak ada komentar:
Posting Komentar