Schreiben Sie in MS Access-Tabelle, Python win32com

Question

Ich spiele mit Win32com.client für Python um zu versuchen, eine Zeile in eine MS Access-Tabelle schreiben/einfügen. Ich habe ein Beispiel gefunden, wie man eine Access-Tabelle here verbindet und abfragt. Grundsätzlich ihr Code leicht für meinen eigenen Gebrauch modifiziert ist:

import win32com.client 

connection = win32com.client.Dispatch(r'ADODB.Connection') 
DSN = 'PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=c:\\testdb.mdb;' 
connection.Open(DSN) 
recordset = win32com.client.Dispatch(r'ADODB.Recordset') 
recordset.Open('SELECT * FROM Table1', connection, 1, 3) 
fields_dict = {} 
for x in range(recordset.Fields.Count): 
    fields_dict[x] = recordset.Fields.Item(x).Name 
    print fields_dict[x], recordset.Fields.Item(x).Value 

Also das mir sagt, wie eine select-Anweisung auf der Access-Tabelle auszuführen. Ich möchte in der Lage sein, Zeilen und Daten in die Tabelle zu schreiben. Wenn ich win32com für MS Office Produkte benutze, tendiere ich dazu, in die MSDN pages einzutauchen und zu versuchen, den VBA-Code für Python-Code zu interpretieren, aber dieser hat mich ein bisschen gefesselt. Das Paar, das ohne Beispiele im Internet nach langen Suchen gefunden hat, hat mich zum zweiten Mal raten lassen, ob das möglich ist oder nicht? hoffentlich hat jemand da draußen schon mal damit gespielt und hat einen Vorschlag.

Answer 1

Wie ich in meinem Kommentar auf die Frage erwähnt, Pyodbc (oder pypyodbc) und der Access ODBC-Treiber ist ein üblicher Weg, CRUD-Operationen zu tun, aber wenn man wirklich win32com und OLEDB verwenden möchten, könnten Sie ein UPDATE wie folgt tun:

import win32com.client 

# ADODB constants 
adVarWChar = 202 
adInteger = 3 
adParamInput = 1 

connection = win32com.client.Dispatch(r'ADODB.Connection') 
DSN = (
    r'PROVIDER=Microsoft.Jet.OLEDB.4.0;' 
    r'DATA SOURCE=C:\Users\Public\mdbTest.mdb;' 
    ) 
connection.Open(DSN) 
cmd = win32com.client.Dispatch(r'ADODB.Command') 
cmd.ActiveConnection = connection 
cmd.CommandText = "UPDATE Donors SET LastName = ? WHERE ID = ?" 
cmd.Parameters.Append(cmd.CreateParameter("?", adVarWChar, adParamInput, 255)) 
cmd.Parameters.Append(cmd.CreateParameter("?", adInteger, adParamInput)) 
cmd.Parameters(0).Value = "Thompson" 
cmd.Parameters(1).Value = 10 
cmd.Execute() 
connection.Close()