Dim Datenbank As Database
Dim Datensatz As Recordset
Set Datenbank = OpenDatabase("Datenbank")
Set Datensatz = Datenbank.OpenRecordset("Datensatz")
DATENSATZ.ADDNEW 'Laufzeitfehler '3420'
Dim Datenbank As Database
Dim Datensatz As Recordset
Set Datenbank = OpenDatabase("Datenbank")
Set Datensatz = Datenbank.OpenRecordset("Datensatz")
DATENSATZ.ADDNEW 'Laufzeitfehler '3420'
Set Datensatz = Datenbank.OpenRecordset("Datensatz", dbOpenDynaset)
Sofern Du über die nötigen Berechtigungen in der DB verfügst, sollte es jetzt gehen:
With Datensatz
.AddNew
.Fields("Vorname") = "Simon"
.Update
End With
(oder sowas in der Art...)
HTH, Matthias
www.dr-rochholz.de
Hab "dbOpenDynaset" mal eingefügt. Klappt aber immer noch nicht.
Was bedeutet eigentlich der Befehl "Fields"? Enspricht der Befehl 'Datensatz.Fields("Vorname")="Simon"' dem Befehl 'Datensatz!Vorname="Simon"', oder wie?
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen