Taki problemik mam. Nie moge sobie poradzic z dodawaniem danych do bazy robilem na dwa sposoby, ale niestety bez rezultatu.
I
Kod: Zaznacz cały
<%
Set adoConnect = Server.CreateObject("ADODB.Connection")
adoConnect.open "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=c:\inetpub\wwwroot\xml\db\filmy.mdb"
SQL = "INSERT INTO * Film (id,tytul, opis,zdjecie, rodzaj, format,jezyk) "
SQL = SQL & "VALUES ("
SQL = SQL & "'" & Request.Form("id") & "', "
SQL = SQL & "'" & Request.Form("tytul") & "', "
SQL = SQL & "'" & Request.Form("opis") & "', "
SQL = SQL & "'" & Request.Form("zdjecie")& "', "
SQL = SQL & "'" & Request.Form("rodzaj")& "', "
SQL = SQL & "'" & Request.Form("format")& "', "
SQL = SQL & "'" & Request.Form("jezyk") & "')"
adoconnect.Execute(SQL)
Response.Write "Film dodany do bazy danych!!!"
%>
Kod: Zaznacz cały
Microsoft JET Database Engine (0x80040E14)
Błąd składniowy w instrukcji INSERT INTO.
/xml/dodaj2.asp, line 19Kod: Zaznacz cały
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=c:\inetpub\wwwroot\xml\db\filmy.mdb"
Set rstK = Server.CreateObject("ADODB.RecordSet")
rstK.Open "film", Conn, 1, 4, 2
rstK.AddNew
rstK("id") = trim(Request.Form("id"))
rstK("tytul") = trim(Request.Form("tytul"))
rstK("opis") =trim( Request.Form("opis"))
rstK("format") = trim(Request.Form("format"))
rstK.Update
Response.Write "Film dodany do bazy danych!!!"
%>Kod: Zaznacz cały
Microsoft JET Database Engine (0x80040E09)
Nie można zaktualizować. Baza danych lub obiekt dostępny jest tylko do odczytu.
/baza/zapisz.asp, line 13Pozdr