Du försöker använda Addera innan den är definierad.
Addera= "Select * From results"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
mvh
2 svar · 194 visningar · startad av AboO
Vad är det som är fel? :q
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/aboox/db/spara.asp, line 6
och så här ser koden ut:
<!-- #include file="adovbs.inc" -->
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("idelada.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
Addera= "Select * From results"
RecSet.Addnew
RecSet("namn")=Request.Form("namn")
RecSet("inlagg")=Request.Form("inlagg")
RecSet.Update
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
Response.redirect "idelada.asp"
%>
results är namnet på tabellen i databasen.
Du försöker använda Addera innan den är definierad.
Addera= "Select * From results"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
mvh
Annars så är din kod ett typexempel på att koda för mycket.
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("idelada.mdb")
connect.execute "insert into results(namn,inlagg) values(" _
& "'" & replace(Request.Form("namn") ,"'","'''") & "'," _
& "'" & replace(Request.Form("inlagg") ,"'","'''") & "')",,128
connect.close
set connect = nothing