Hej! Lite svårt att se utan att veta felmeddelande, men jag gissar på att du ska byta adOpenStatic mot adOpenDynamic.Lägga till i databasen
Vi vill lägga till information från två textrutor till databasen, varför vill det inte?
<input type="hidden" name=ValtNamn value=<%=Request.Form("namn")%>>
<input type="hidden" name=ValtTelenr value=<%=Request.Form("telenr")%>>
<%Dim Connect, dsntemp, RecSet, Addera
Set Connect = Server.CreateObject ("ADODB.Connection")
dsntemp ="DRIVER=Microsoft Access Driver (*.mdb);"
dsntemp=dsntemp & "DBQ=" & Server.MapPath ("bowling.mdb")
Connect.Open dsntemp
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT Namn, Telefonnr FROM Bokning"
RecSet.Open Addera, connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
RecSet("Namn") = Request.Form("ValtNamn")
RecSet("Telefonnr") = Request.Form("ValtTelenr") RecSet.Update RecSet.Close
Connect.Close
%>
Tack på förhand!
//Anna och MarieSv: Lägga till i databasen
/Johan