SQL

1. Variablen einbinden

Eine Variable in der Where-Bedingung wird wie folgt verwendet:

"WHERE ((FeldName)= ‚" & variable & "‘);"

Bei Datumsangaben muß, entgegen der MS ACCESS Hilfe, die amerikanische Schreibweise verwendet werden: #mm/dd/yy#

2. SQL-Abfrage in VBA

Dim datenbank As Database
Dim var_name As QueryDef
Set datenbank = CurrentDb()
Set var_name = datenbank.QueryDefs("Abfragename")
                        "
                        "

var_name.SQL = "SELECT Tabellenname1.Feldname1, Tabellenname1.Feldname2, ... Tabellenname2.Feldname1, Tabellenname2.Feldname2, ... FROM Tabellenname1 INNER JOIN Tabellenname2 ON Tabellenname1.Feldname_bez = Tabellenname2.Feldname_bez WHERE (((Tabellenname_x.Feldname_y) Between #1/1/00# AND #12/31/00#) AND ((Tabellenname_y.Feld_y)= ‚" & variable & "‘);"

Die SQL-Anweisungen können aus der Abfrage kopiert werden.

Achtung: Bei Verwendung von Variablen in der SQL muß genau auf die Syntax (Leerzeichen, Klammerung und einfache Hochkommatas) geachtet werden.