Autologin & Husk mig -fonktion (kan nogle hjælpe mig )

http://activedeveloper.dk/download/default.asp?mode=showdownload&id=301

Der er et komplet system, med husk mig og autologin system

fun22 > det har jeg prøvet, men uden held !

Hvis du kan vise mig hvordan man bruger det så ?

//muleen

På alle de sider der skal beskyttes skal du indsætte det her:

<%
Option Explicit

Dim objConn
Dim strSQL

If Len(Session("userid")) = 0 Then
    Response.Redirect("form.asp")
End If

%>

Form.asp er den side du indtaster login oplysninger på, og login.asp er den side der registrer alle oplysningerne.

i form.asp ændre du denne linie:

Response.Redirect("default.asp")

med denne:

Response.Redirect(Request.ServerVariables("HTTP_REFERER"))

Og så skulle det virke

Okay....


Men den klager stadig over der står : Option Explicit

Det kan den ikk lide !!!

//muleen

så fjerner du bare det der står
Option Explicit

Dim objConn
Dim strSQL
ved.

dette er et alm. login - jeg har login jeg mangler bare en fonktion der hedder autologin

-hvad siger du til hvis du laver et login system med autologin-fonktion og sender den til mig, skal vi sige 200 points (Ps. selvfølgelig uden fejl dvs. Option Explicit & Co.)

//muleen

hvad er din mail?

den er marcus@zoomsite.dk - på forhånd tak

Du skriver lige når du har sendt den ikk ???

post også lige koden her på exp.dk, så får vi alle glæde af det og du overholder alle regler!
:>Gizom

gizom > jeg har ikke nogle kode endnu ! venter på han sender....

Men kender du således script ?

//muleen

ikke lige dette men kan da godt tage en kig på det!
fun22 har ret i at det godt kan være Option Explicit der er dit problem da ikke alle server er konfigureret til at understøtter
Option Explicit er bare at du tvinges til erklære dine variabler og kan godt undværes selv om det er pænere og mere rigtigt at bruge Option Explicit i sin kode..

vil du så ikke konfigurere et modul til mig hvor der er sikkert login og med autologin så får du de point jeg har lovet ham den anden ?

Du kan bare sende den til marcus@zoomsite.dk


//muleen

gi ham nu lige en chance for at svare!

sendt

fun > jegh kan ikke downloade den fra mail'en !!!!

det virker !

men hvordan deaktivere jeg Husk mig & autologin -fonktionen ?

hent login.zip

http://eksperten.zig-software.dk/362409/?folder=362409

indsæt det her der hvor du vil have knapperne til at slå det fra med:

<%

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å autologin fra""></p><p><input type=""submit"" name=""knap2"" value=""Slå husk mig fra""></p>")
Response.Write("</form>")

%>

er der ikke en der vil lave den hvis jeg nu sender alle mine filer ???

//muleen

hvis ikke du kan finde ud af at copy/paste så tror jeg du skal til at læse nogen bøger om emnet

jeg kikker på det en af de næste par dage...!