Select Abfragefehler

[Ben.Wisch]

Hallo Zusammen,

ich hoffe Ihr habt die Weihnachtsfeiertage ohne größere Probleme überstanden. Dafür
hätte ich nun gerne mal eins. Ich sehe vielleicht den Fehler nicht vor lauter Coding
aber ich komme nicht weiter.

Dim strSQL2 As String
Dim strSQL3 As String


strSQL3 = "frm956"


     strSQL2 = "SELECT A.DV_Prod_Firma " & _
                   "FROM Allgemein11 AS A " & _
                   "WHERE A.txtMenu = " & strSQL3 & ";"
     Debug.Print strSQL2
     DoCmd.RunSQL strSQL2

Wo habe ich den Fehler oder was habe ich falsch gemacht? Bitte um Hilfe

D A N K E !!!

Ben Wisch

[daolix]

wenn ich es richtig lese willst du mit der where - klausel einen string vergleichen. ändere strsql3

strSQL3 = "'frm956'"

[DF6GL]

Hallo,

würde das eher so schreiben:

strSQL2 = "SELECT A.DV_Prod_Firma " & _
                   "FROM Allgemein11 AS A " & _
                   "WHERE A.txtMenu = '" & strSQL3 & "'"


Die Hochkommata gehören zur SQl und nicht zum Text-Wert (in der Variablen  strSQL3 )


(Das Semikolon kann weggelassen werden)