sub Kompetenzenadd(w)
Set cn = Server.CreateObject("ADODB.Connection")
strPfadDB = Server.MapPath("db\Server_Konf.mdb")
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPfadDB
cn.Open strConn
dim q
q=1
do while rs.EOF=false
=false ist überflüssig, und wo wird bitte schön das rs gefüllt?
q=q+1
rs.moveNext
loop
tempstring = "INSERT Into [tbl_Kompetenzen]([ID], [Kompetenz]) VALUES("&q&", "&w&")"
Führe den Befehl mal manuell aus, mit dummywerten, klappts?
-Was für Datentypen sind das? -> evtl fehlen ''
-Falls ID Numerisch, definiere ID als AutoWert
Folgendes funktioniert bei mir bei manueller Ausführung:
INSERT Into tbl_Kompetenzen(Kompetenz) VALUES("w")
-> In VB:
cn.execute "INSERT Into tbl_Kompetenzen(Kompetenz) VALUES('" & variable & "')"
cn.execute tempstring
cn.close
set cn = Nothing
end subMein Chef hat gemeint, ich sollte versuchen die Variablen in Eckige Klammern zu packen. Das hab ich nicht ganz verstanden, aber ich habs mal versucht. Ohne sichtbaren Erfolg. ._.
Das wäre sinnvoll wenn die Spaltennamen von Access reservierte Schlüsselwörter sind (evtl ID)
Was soll ich machen?
siehe oben
Danke im Voraus~
Ankha