sql-String; where [FeldName] = Datum

08/02/2009 - 17:26 von Günter Ruske | Report spam
Hallo Allerseits.

Würde gerne Eure Hilfe zu folgendem benötigen...

In einem Klassenmodul unter A97 würde ich gerne den nachfolgen SQL-String
einsetzen wollen der eine WHERE-Klausel und ein Datumswert beinhaltet.

Die Syntax:
Dim dbs As Database, rst As Recordset, strSQL$, a as Date

strSQL = "SELECT * FROM [TabellenName] WHERE [FeldName] = " & a

Set dbs = CurrentDb
Set rst = dbs.OpenRecordset(strSQL, dbOpenDynaset)

Beschicke a mit einem Datum im Deutschen Datumsformat, wie z.B. 05.01.2009
(5. Januar 2009) oder so: 01/05/2009 oder auch so: 01-05-2009.

Auch der Einschluß von a in Literalzeichen (#) hat mal nix gebracht. A97
meldet permanent einen Syntaxfehler.

Der richtige Record wird zwar mit rst.FindFirst gefunden wenn das Datum im
Kriteriums-Format 01-05-2009 eingestellt wird jedoch würde ich gerne als
Ergebnis im rst.RecordCount eine 0 oder >/= 1 haben wenn das gegebene Datum
in der Tabelle vorhanden ist.


Danke für Eure Mühe einer RA nebst Gruß
Günter
 

Lesen sie die antworten

#1 Gunter Avenius
08/02/2009 - 17:32 | Warnen spam
Hallo Günter,

Günter Ruske schrieb folgendes:
In einem Klassenmodul unter A97 würde ich gerne den nachfolgen SQL-String
einsetzen wollen der eine WHERE-Klausel und ein Datumswert beinhaltet.

Die Syntax:
Dim dbs As Database, rst As Recordset, strSQL$, a as Date

strSQL = "SELECT * FROM [TabellenName] WHERE [FeldName] = " & a

Set dbs = CurrentDb
Set rst = dbs.OpenRecordset(strSQL, dbOpenDynaset)

Beschicke a mit einem Datum im Deutschen Datumsformat, wie z.B. 05.01.2009
(5. Januar 2009) oder so: 01/05/2009 oder auch so: 01-05-2009.



www.donkarl.com?FAQ6.8 geht darauf ein.

Auch der Einschluß von a in Literalzeichen (#) hat mal nix gebracht.
A97 meldet permanent einen Syntaxfehler.

Der richtige Record wird zwar mit rst.FindFirst gefunden wenn das
Datum im Kriteriums-Format 01-05-2009 eingestellt wird jedoch würde
ich gerne als Ergebnis im rst.RecordCount eine 0 oder >/= 1 haben
wenn das gegebene Datum in der Tabelle vorhanden ist.



?

Wenn 1 DS gefunden wird ist RecordCount = 1
Lese mal: www.donkarl.com?FAQ6.17

Gruß
Gunter
__________________________________________________________
Access FAQ: http://www.donkarl.com
home: http://www.avenius.com - http://www.AccessRibbon.de
http://www.ribboncreator.de

Ähnliche fragen