If Request.Form("knap") = "Slå autologin fra" Then Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("logins.mdb")
strSQL ="UPDATE users SET autolog = FALSE WHERE (pkuserid =" & Session("userid") & ");" objConn.Execute(strSQL)
Response.Redirect("form.asp") End If
If Request.Form("knap2") = "Slå husk mig fra" Then Response.Cookies("brugernavn").Expires = date() - 1 Response.Cookies("password").Expires = date() -1 End If Response.Write("<p class=""tdtext"">Velkommen " & Session("username") & "</p>") Response.Write("<form method=""POST"" action=""default.asp"">")
Response.Write("<p><input type=""submit"" name=""knap"" value=""Slå auto login fra"</p><p><input type=""submit"" name=""knap2"" value=""Slå husk mig fra""></p>") <<<----de to knapper skal laves om
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.