5 svar · 234 visningar · startad av roady
Jag har aldrig fått detta att funka, läst mycket och kolla i andra formulär osv. Men varför funkar inte mitt script :(
Får felmeddelande:
Microsoft JET Database Engine fel '80040e24'
Raduppsättningen stöder inte hämtning bakåt
/halland/AddNew.asp, rad 13
Och såhär ser min script ut...
<% Option Explicit
Dim strConnect, objRS
strConnect = "Provider=Microsoft.JET.OLEDB.4.0;" & _
"Data Source=C:\InetPub\wwwroot\halland\people.mdb;" & _
"Persist Security Info=False"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open "dag1", strConnect
objRS.MoveLast
objRS.AddNew
objRS("Namn") = "Pelle"
objRS.Update
objRS.Close
response.redirect "index.html"
%>
Det är alltså objRS.MoveLast som krånglar
Gör inte insert på det sättet. Använd sql direkt.
<% Option Explicit
Dim strConnect, objCon
strConnect = "Provider=Microsoft.JET.OLEDB.4.0;" & _
"Data Source=C:\InetPub\wwwroot\halland\people.mdb;" & _
"Persist Security Info=False"
Set objCon = server.createobject("adodb.connection")
objCon.open strConnect
objCon.execute "insert into dag1(namn)values('Pelle')"
objCon.Close
response.redirect "index.html"
%>
dubbelpost
oki, men hur funkar detta ifall jag vill lägga in flera värden?
är det något sånt här eller är jag helt fel ute :q
objCon.execute "insert into dag1(namn)values(request.form("namn"))" & _
"dag1(arbete)values(request.form("arbete"))"
objCon.execute "insert into dag1(namn, arbete) values ('" & request.form("namn") & "', '" & request.form("arbete") & "')"
Mvh,
Detta funkar ju hur bra som helst... Får jag fira när jag kommer hem :birp