Wie Einfügen eines Datumswerts in eine MDB-Datenbank mithilfe von VBScript?

Question

Ich würde gerne wissen, was ich tun soll, um einige Daten in eine Tabelle einzufügen. Meine Tabelle hat 4 Spalten:

ID (Autowert)
First_Name
Last_Name
Datum

Ich mag würde einige Daten mit VBScript einzufügen. Hier ist, was ich bisher:

sub DBinsert(fname, lname) 
    Set objCon= CreateObject("ADODB.Connection") 
    Set RS1 = CreateObject("ADODB.Recordset") 

    WScript.echo "DBInsert" 

    objCon.Open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Users\bonhkarl01\Desktop\Blank database.mdb" 



        objCon.execute(" Insert into table3(First_Name, Last_Name, Date) Values ('" & fname & "','" & lname & "','" & Date() & "') ") 


End sub 

Es funktionierte so weit, wenn ich ohne die „Date“ versucht, in einem anderen Tisch ... Gibt es etwas falsch mit dem objCon.execute Befehl?

Der Fehler Ich erhalte ist

Syntaxfehler in der INSERT INTO-Anweisung.

Answer 1

Date ist ein reserved word in Access SQL. Wenn Sie auf eine Spalte mit dem Namen Date verweisen müssen, müssen Sie sie in eckige Klammern setzen.

objCon.execute(" Insert into table3 (First_Name, Last_Name, [Date]) Values ...