SQL mit Datum

03/01/2009 - 16:52 von Mike Berger | Report spam
Hallo zusammen,

nun bin ich mal wieder an mein Problem mit dem Datum gekommen.

Mein Probem ist, dass ich immer Fehler: 3,464 "Datentypen im
Kriteriumsausdruck unvertràglich"

Code:

Dim hilfDatum As String
hilfDatum = Format(Me.dateErstellungsDatum, "mm/dd/yyyy")

Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String

strSQL = "SELECT tblKalenderwoche.intJahr, tblKalenderwoche.bytKW,
tblKalenderwoche.dateVon, tblKalenderwoche.dateBis " & _
"FROM tblKalenderwoche " & _
"WHERE " & hilfDatum & " BETWEEN tblKalenderwoche.dateVon AND
tblKalenderwoche.dateBis;"

' Versucht hatte ich auch:
'"WHERE tblKalenderwoche.dateVon > '" & hilfDatum & "' AND
tblKalenderwoche.dateBis < ' " & hilfDatum & "';"
' geht aber auch nicht

Set db = Application.CurrentDb
Set rs = db.OpenRecordset(strSQL, dbOpenDynaset) < Fehlermeldung

...

Ich habe die Tabelle tblKalenderwoche mit
intJahr = 2009
bytKW = 01
dateVon = 27.12.2008
dateBis = 04.01.2009

Nun möchte ich das Feld Me.dateErstellungsDatum mit dateVon und dateBis
vergleichen, damit ich intJahr und byteKW bekomme.

Wenn ich WHERE weglasse, làuft es ganz gut durch und es wird mir der
erste Datensatz angezeigt.

Habe mir auch schon überlegt, ob ich vielleicht erst den Vergleich
mache, wenn die ganze Tabelle eingelesen ist.

Was mach hier falsch?

Danke
Mike
 

Lesen sie die antworten

#1 Jens Schilling
03/01/2009 - 16:57 | Warnen spam
Hallo, MIke

Mike Berger wrote:
Mein Probem ist, dass ich immer Fehler: 3,464 "Datentypen im
Kriteriumsausdruck unvertràglich"

Code:

Dim hilfDatum As String
hilfDatum = Format(Me.dateErstellungsDatum, "mm/dd/yyyy")



Probiers mal wie in der FAQ 6.8 Datum an SQL-String übergeben
(www.donkarl.com?FAQ6.8) beschrieben

Gruss
Jens

Ähnliche fragen