Insert-Anweisung in Zugriff gibt Fehler

Question

Ich habe an dem Erstellen einer extrem einfachen Datenbank mit nur 4 Tabellen und nur wenigen Informationen pro Spalte gearbeitet. Eine meiner Tabellen heißt "Kunde" und innerhalb dieser Tabelle gibt es 4 Spalten für Informationen.

Ich habe eine Taste auf meiner „AddCustomerForm“, das den folgenden Befehl ausführt

Private Sub cmdadd_Click() 
CurrentDb.Execute "INSERT INTO Customer(Customer ID, Email, Identifier) " & _ 
= VALUES(Customer ID, Email, Identifier) 
End Sub 

Kundenformular hinzufügen Meine sieht wie folgt aus:

Könnte jemand bitte darauf hinweisen, was ich vermasselt ? Der Fehler, den ich erhalte, ist:

Syntaxfehler.

Answer 1

Zugriff erfordert Klammern um jeden Feldnamen mit einem Leerzeichen. Ich löschte auch die = vor VALUES und änderte die Werte, um Ihre Formularsteuerelemente zu verweisen, die Sie entsprechend benennen müssen. Sie benötigen außerdem ein Semikolon, um die Anweisung abzuschließen, und müssen Ihre doppelten Anführungszeichen schließen.

This Seite könnte bei der Syntax helfen.

Answer 2

Es gibt ein paar Probleme, die ich sehe - ist [Kunden-ID] ein Auto-Nummer-Feld? Wenn ja, schließe es nicht ein.

Auch - wenn Sie eine manuelle Einfügung ausführen Ich nehme an, dass Ihr Formular nicht an Ihre Tabelle gebunden ist, obwohl ich mich frage, warum Kunden-ID im Formular als bearbeitbar angezeigt wird?

Schließlich sieht es aus wie Ort eine numerische ID Zugehörigkeit zu ID-Feld der Lage Dropdown ist die

im Business-ID-Feld füllt

Dies wird Ihnen helfen Debuggen von SQL und zeigen Sie uns, was falsch ist

es hinzufügen auf Ihre Schaltfläche und zeigen uns, den Wert in Direkt-Fenstern angezeigt, wenn der Code

Dim strSQL as string 
    strSQL = "INSERT INTO Customer ([Customer ID], Email, Identifier) VALUES (" _ 
    & me.[Customer ID] & ",""" & Me.[Email] & """,""" & Me.[Identifier] & """)" 
    Debug.print strSQL 

    CurrentDb.Execute strSQL 

Wenn der Kunde ID stoppt wird Autowert diese stattdessen versuchen (unter der Annahme Form ungebunden ist) und Location-ID-Wert der ersten Spalte der Dropdown ist

Dim strSQL as string 
    strSQL = "INSERT INTO Customer (Email, Identifier) VALUES (" _ 
    & me.[Customer ID] & ",""" & Me.[Email] & """, & Me.[Identifier] & ")" 
    Debug.print strSQL 

    CurrentDb.Execute strSQL