Ja hej på er.. Anropa denna Sub när inloggningen har lyckats och användaren har kryssat i att man inte behöver "logga in igen".... OK.. men du du hur se en gobal.asa fil ut eller hur behöver den se ut Så här ser en standard global.asa ut men ska jag includera filen gobal.asa i filen login_check.asp då? ok för att få en checkbox skriver du följandeAutomatisk inlogging..
denna frågan har säkert sältts 100 gånger..
men nu e det som så här att jag har förökt ett tag
men har inte fått de och funka..
men de e so så här att jag vill använad mig av cookies
så man loggas in automatiskt men jag vill hadet som här på
pellesoft.. såå att man få kryssa i en ruta om man vill logga in automatiskt
om man inte vill logga i automatiskt så behöver man inte kryssa i någon ruta..
hoppas att jag har förklart bra..
//MikaelSv: Automatisk inlogging..
<code>
Sub s_Cookie(strUserId)
Dim intDays
'## Hur många dagar som cookien skall gälla
intDays = 30
'## Här kan du sätta vilka cookies som helst jag sätter endast medlemens UserId
Response.Cookies("dinsite")("intUserId")
Response.Cookies("dinsite").Expires = DateAdd("D", intDays, Date())
End Sub
</code>
Sen lägger du denna kod i Sub Session_OnStart() i global.asa
<code>
Sub Session_OnStart()
'## Kollar om det finns nån cookie på besökarens dator
If Request.Cookies("dinsite").HasKeys Then
'## Deklarerar mina variabler
Dim intUserId
Dim intDays
'## Hämtar värdena ur cookien
intUserId = Cint(Request.Cookies("dinsite")("intUserId"))
'## Hur många dagar som cookien skall gälla
intDays = 30
'## Sätter tillbaks värdena i en ny cookie med nytt expires datum
Response.Cookies("dinsite")("intUserId") = intUserId
Response.Cookies("dinsite").Expires = DateAdd("D", intDays, Date())
'## Här beror det på hur du byggt upp din site, men på detta exempel
'## så sätter jag en session("granted") som jag kollar högst upp på varje sida i
'## Area51(medlemssidorna). Är inte den true så skickas man till inloggningssidan
Set Session("granted") = true
Response.Redirect("area51.asp")
End If
End Sub
</code>
mvh icaaq
Sv: Automatisk inlogging..
för att detta ska funka för jag har aldrig anväänt gobal.asa i hela
mitt korta liv..
/MikaelSv: Automatisk inlogging..
<code>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Session_OnStart
End Sub
Sub Session_OnEnd
End Sub
Sub Application_OnStart
End Sub
Sub Application_OnEnd
End Sub
</SCRIPT>
</code>
Denna läggs alltid i rooten av din webapplikation
mvh icaaqSv: Automatisk inlogging..
Sen hur ska jag skriva ut koden med den där lilla rutan som man ska kunna
kryssa i ? Är det ingen som kan skriva ut koden med den där rutan man ska kunna kryssa i oxå?
sn kanske ni ska ha detta oxå. Id´t för användarna heter userId ..
men skulle va jätte tacksam för hjälp svar eller något i den stilen...
/MikaelSv: Automatisk inlogging..
<code>
<input type='checkbox' name='chkCookie' value='true'>
</code>
Och du kan kolla om den är ikryssad på följande sätt
<code>
If Request.Form("chkCookie") = "true" Then
</code>
Så du borde kunna göra följande
<code>
'## Kollar mot din databas om användaren finns, om JA så tas userId ut ur den och läggs i en varibel
intUserid = Cint(objRs("userid"))
'## Om checkboxen är ikryssad så anropar man subben s_Cookie
if Request.Form("chkCookie") = "true" then
Call s_Cookie(intUserid)
End If
</code>
mvh icaaq