Update-Abfrage, die Zahlen auf ein Textfeld anwenden sollte fehlschlagen

Question

Ich habe eine einfache Update-Abfrage, die Zahlen auf ein Textfeld anwenden sollte, aber es behält die führende Null fallen. Sollte 054846 sein, endet aber als 54846. Ich kann nicht herausfinden, was ich vermisse.

Dim strsql As String 
strsql = "UPDATE [Action]" _ 
     & "SET [Action] = (" & "054846" & ")" 

DoCmd.RunSQL strsql 

Bitte helfen

Answer 1

Es klingt wie das Feld in der Tabelle als String definiert ist. Aber die SQL, die Sie haben, hat die Zahl als Integer, weil Sie den Wert nicht mit einfachen Anführungszeichen umgeben haben. Sie werden das Problem sehen, wenn Sie die SQL-Zeichenfolge ausgeben, die Sie ausführen möchten.

Answer 2

Surround-Nummer mit einzelner qoute '

Dim strsql As String strsql = "UPDATE [Aktion]" _ & "SET [Aktion] ='" & "054846" & "‘" DoCmd.RunSQL strsql