In eine Access Datenbank schreiben

F

f.k. deleted

Hallo NG

Ich habe folgendes Problem:
Ich will in meine Datenbank was reinschreiben.
Ich bekomme das einfach nicht hin. Ich benutze File DSN´s um auf die Datenbank zuzugreifen.
Hier mal ein bischen Code:

if vcd.Supports (adUpdate + adAddNew) Then
vcd.AddNew
vcd.Fields("vcd_name") = Request.Form("vcdname")
vcd.Fields("cd_anzahl") = Request.Form("anzahlcd")
vcd.Fields("format") = Request.Form("format")
vcd.Fields("sprache") = Request.Form("sprache")
vcd.Update
Else
Response.Write("Keine Aktualisierung möglich !")
End if


Die Datenbank öffne ich so:

vcd_open = "SELECT * " & _
"FROM Filme "

'Der Rest geht über File DSN

set vcd = verbindung.execute(vcd_open)

und das ist die Fehlermeldung die ich bekomme (immer)
ADODB.Recordset (0x800A0CB3)
Das Objekt oder der Provider kann den angeforderten Vorgang nicht ausführen.


Im Vorraus schon mal wie immer besten Dank

Florian
 
Hier mal ein bsp. mit dem ich Arbeite !
Ist aber DSNLESS

Code:
<%
'Connetion Access Datenbank
Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "PROVIDER=MSDASQL; DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("dbpfad")& ";"

'In die DB schreiben
set xxx = Server.CreateObject("ADODB.Recordset")
xxx.open "tabellen_name" , Myconn, 2,2
xxx.addnew
xxx("feld1") = variable_1
xxx("feld2") = variable_2
xxx("feld3") = variable_3
xxx("feld4") = variable_4
xxx.update

xxx.close
Set xxx = Nothing

'Connection schliessen
MyConn.close
set MyConn = nothing
%>
 
Danke für die Antwort

So habe ich es früher gehabt.
Nur jetzt will (muss) ich es mit File DSN´s machen und da geht diese Methode leider nicht.
 
Zurück