DateWithSQL
Dim db as database Dim rs as recordset Dim SQL$ SQL$ = "SELECT * FROM table WHERE startdate = #" SQL$ = SQL$ & Format(searchdate,"mm-dd-yy") & "#" Set db = opendatabase(databasename) Set rs = db.openrecordset(SQL$)
Dim db as database
Dim rs as recordset
Dim SQL$
SQL$ = "SELECT * FROM table WHERE startdate = #"
SQL$ = SQL$ & Format(searchdate,"mm-dd-yy") & "#"
Set db = opendatabase(databasename)
Set rs = db.openrecordset(SQL$)
( datewithsql.html )- by Paolo Puglisi
- Modifica del 17/12/2023