får inte den här koden att funkar... nån som ser vad felet är?
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("lundin.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * from boka"
RecSet.Open Addera, Connect, 3, 3
RecSet.Addnew
RecSet("artal") = Request.Form("year")
RecSet("week") = Request.Form("week")
RecSet("stuga") = Request.Form("stuga")
RecSet.UPDATE
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
Response.Redirect("done.asp")
%>
Felmeddelande:
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] Cannot update. Database or object is read-only.
/lundin/add_bokning.asp, line 27
Rad 27 är: RecSet.Update