Habe ein Problem und zwar bei diesem Code:
Wenn ich nun auf den Button klicke, was dieses Event hier ausführt.. kommt ein Fehler, der da lautet:
"Laufzeit fehler '3061': 1 Parameter erwartet, aber zu wenig Parameter übergeben"
Der Fehler wird in der Zeile mit dem CodeDb.Execute angezeigt.. hinter dem Values(strEintrag)" .. fehlt noch ein Parameter namens "Option" .. aber ich habe echt keine Ahnung was da reinkommt, weil ichs weder in der Hilfe finde, noch im Internet.. kann mir da evt. mal einer helfen? .. Ich hab da mal was eingetragen was ich in der Hilfe gefunden hab und zwar irgendwas mit dbRun... dann kam nen Fehler "Erwartet:=" ...
Vielleicht kann mir ja mal einer helfen...
Code:
Dim con As New ADODB.Connection
Dim RS As ADODB.Recordset
Dim strEintrag As String
Dim conStr As String
strEintrag = Me.txtName
conStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Doku.mdb"
con.Open conStr
Set RS = New ADODB.Recordset
RS.Open "tblAnsprechpartner", con, adOpenDynamic
CodeDb.Execute ("INSERT INTO tblAnsprechpartner(Name) VALUES (strEintrag)")
Wenn ich nun auf den Button klicke, was dieses Event hier ausführt.. kommt ein Fehler, der da lautet:
"Laufzeit fehler '3061': 1 Parameter erwartet, aber zu wenig Parameter übergeben"
Der Fehler wird in der Zeile mit dem CodeDb.Execute angezeigt.. hinter dem Values(strEintrag)" .. fehlt noch ein Parameter namens "Option" .. aber ich habe echt keine Ahnung was da reinkommt, weil ichs weder in der Hilfe finde, noch im Internet.. kann mir da evt. mal einer helfen? .. Ich hab da mal was eingetragen was ich in der Hilfe gefunden hab und zwar irgendwas mit dbRun... dann kam nen Fehler "Erwartet:=" ...
Vielleicht kann mir ja mal einer helfen...