16. december 2004 - 14:34Der er
6 kommentarer og 1 løsning
cookie i asp login script
Hej Nogen der kan hjælpe mig med at lægge en cookie ind i nedenstående script, så det huskes næste gang brugeren kommer, men kun hvis de klikker en check box af?
<% if Request("username") <> "" and Request("password") <> "" then strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../DB/bruger.mdb") Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN strSQL = "SELECT * FROM user where (username = '" & replace(Request("username"),"'","''") & "') and (password ='" & replace(Request("password"),"'","''") & "')" Set ez = myConn.Execute(strSQL) if not ez.eof then 'Log ind Session("login") = "yes mate" Session("UserID") = ez("ID") Session("Password") = ez("password") session("UserName") = ez("username") EZ.Close myConn.Close Response.Redirect "result.asp" else 'Ikke godkendt Session("login") = "" error = "Du blev ikke godkendt af systemet" end if end if %>
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
<% if Request.Cookies("login") = "ok" then Response.redirect "result.asp" end if if Request("username") <> "" and Request("password") <> "" then if Request("cookiefest") then Response.Cookies("login") = "ok" Response.Cookies("login").Expires = date() + 100 end if strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../DB/bruger.mdb") Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN ............
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.