Hallo,
vielleicht kann mir hier jemand helfen.
Ich habe immer wieder Probleme mit dem „Datum“…
Mein aktuelles Problem:
Ich möchte Datumswerte an eine SQL-Anweisung übergeben.
Was ich schon herausgefunden habe, ist, dass Access ein Format wie #03/18/2005# (=18.03.2005) haben möchte.
Ich habe versucht, das in die Anweisung folgendermaßen einzubauen:
(Es sollen hierbei Datensätze in eine Tabelle ausgelagert werden…)
'***********************************************
dim db as DAO.Database
dim rs as DAO.Recordset
Dim sql as string
dim qd as DAO.QueryDef
dim vonDatum as String, bisDatum as String
Set db = Application.CurrentDb
Set rs = db.OpenRecordset(„A_erstes_Reservierungsdatum“)
with rs
.MoveFirst
vonDatum = Format(![Datum],"\mm/dd/yyyy#")
.close
End With
bisDatum = Format(DateValue(Now())-1,"\mm/dd/yyyy#")
sql = "INSERT INTO T_Exportierte_Daten "
sql = sql + "SELECT T_Reservierung.* "
sql = sql + "WHERE ((([T_Reservierung]![Datum])>= " & vonDatum & " AND([T_Reservierung]![Datum])