logger ikke rigtigt ud

For at slette alle dine sessions, kan du skrive:

Session.Abandon

og bliver alle sessions nulstillet!

//>Rune

du skal bruge session.abandon istedet for. herved bliver alle sessions lukket for den pågældende klient.

/Søren Søndergård

Så for at tjekke det kan du så skrive:

If Session("bruger") = "" Then
    Response.Write("Du er nu logget ud!")
End If

//>Rune

hehe, 2 sjæle én tanke. øv han var 21 sec hurtigere

Du kunne evt. oxo skrive:
<%
    Session("bruger").Abandon
%>

og så ville din Session "bruger" blive nullstillet...!
//>Rune

Prøver lige....

Fair nok ;-)

//>Rune

har nogen problemer login nu...

Hmm..så har du ikke adskilt dem...!

Skriv som følgende:

<a href="<%= Request.ServerVariables("SCRIPT_NAME") %>?logud=nu">Logud nu</a>

<%
  If Request.QueryString("logud") = "nu" Then
    Session.Abandon
  End If
%>

-og slet alle andre abandon's!
//>Rune

soes> ;-) that's life...

//>Rune

kommer nok til at tag noget tid... den vil fan'me ikke logge ind nu...

hmm... det er lidt weird.... -men prøv at forsøg lidt med det... Dit spm er besvaret med de rigtige svar...

//>Rune

okay... hvad for et af dem skal jeg bruge så... det letteste...?

ved ikke om i vil hjelp med den her jeg kan ikke få det til at virke
%
SET rs = Server.CreateObject("ADODB.Connection")
rs.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("login.mdb")


Sql = "Select Count(*) as Found from users where (username = '" & Request("username") & "') and (password ='" & Request("password") & "')"
Set Login = Rs.Execute(Sql)
if Login("Found") = 0 then
Session("login") = 0
error = "<center><b>Forkert Username eller Password prøv igen!<b></center>"
else
Session("Login") = 1
Session("password-session") = Request("username")
Response.Redirect "login-ok.asp"


end if

%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
<link rel="stylesheet" href="../css/default.css" type="text/css">
<!-- #include file=../head.asp -->
</head>
<body bgproperties="fixed">
<a class="overskrift">Login</a><br>
<%  if Request.form("username") & "') and (password ='" & Request.form("password") & "')"
if Request.form("username") & "') and (password ='" & Request.form("password") & "')" and not login = true Then
login = true
%>
<SCRIPT LANGUAGE = VBScript>
MsgBox "Log in successful", vb , "Velkommen"
</SCRIPT>
<%
    Session("bruger") = Request.Form("brugernavn")
    Session("login") = "ja"
    Session("loginadmin") = "ja"
    Session("loginsuperadmin") = "ja"
    Session.Timeout = 60
    Response.Write "<a class=brod>Du er logget ind korrekt.</a><br>"
    Response.Write "<a class=brod>Gå til <a href=../nyheder.asp class=hold>nyheder</a>."
%>
<%
elseif not login = true Then
login = false
end if
%>
<%
if login = false Then
%>
<SCRIPT LANGUAGE = VBScript>
MsgBox "Du har indtastet forkert password eller brugernavn prøv igen.", vb, "Forkert password"
</SCRIPT>
<%
    Session("bruger") = "nej"
    Session("login") = "nej"
    Session("loginadmin") = "nej"
    Session("loginsuperadmin") = "nej"
    Session.Timeout = 60
    Response.Write "<a class=brod>Du er ikke logget ind korrekt.</a><br>"
    Response.Write "<a href=login.asp class=hold>Prøv igen</a>."
end if
%>
</body>
</html>

Det her:

<a href="<%= Request.ServerVariables("SCRIPT_NAME") %>?logud=nu">Logud nu</a>

<%
  If Request.QueryString("logud") = "nu" Then
    Session.Abandon
  End If
%>

//>Rune

Det vil nullstille alle dine Sessions...

//>Rune

okay

<%
SET rs = Server.CreateObject("ADODB.Connection")
rs.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("login.mdb")


Sql = "Select Count(*) as Found from users where (username = '" & Request("username") & "') and (password ='" & Request("password") & "')"
Set Login = Rs.Execute(Sql)
if Login("Found") = 0 then
Session("login") = 0
error = "<center><b>Forkert Username eller Password prøv igen!<b></center>"
else
Session("Login") = 1
Session("password-session") = Request("username")
Response.Redirect "login-ok.asp"


end if

%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
<link rel="stylesheet" href="../css/default.css" type="text/css">
<!-- #include file=../head.asp -->
</head>
<body bgproperties="fixed">
<a class="overskrift">Login</a><br>
<% 
if Request.form("username") & "') and (password ='" & Request.form("password") & "')" and not login = true Then
login = true
%>
<SCRIPT LANGUAGE = VBScript>
MsgBox "Log in successful", vb , "Velkommen"
</SCRIPT>

hvad skal jeg med den kode? :-)

//>Rune

vil du hjelpe med at få det til at virke.. det er login'en
hvis du kan og vil?

Hmm.. lige en ting.. det er ikke særlig godt at sætte dine sessions om med 1 og 0 taller... Så er det bedere at gøre som følgende:

If Request.Form("brugernavn") = "Rune" Then
  Session("username") = "Rune"
Else
  Session("username") = ""
End If

og så for at efter spørge det senere..

<%
If Session("username") = "" Then
  Response.Write("Du er ikke logget på!!!")
Else
%>
<html>
<body>
hej
</body>
</html>
<%
  End If
%>

//>Rune

Well, for nogle poinz vil jeg gerne...!

//>Rune

den køre med en mdb fil...?

-og så til den tid hvor du vil logge brugeren ud.. skriver du bare

<%
  Session.Abandon
%>

//>Rune

jaja.. kan du godt få nogen fler poinz...

ok.. vil den ikke logge ind? eller hvad er problemet? -send lige dokumentet til rune@medions.dk

-og tag lige og Acceptere det her spm, da jeg jo har svaret..

//>Rune

jeg har sendt det

er det iorden hvis jeg omskriver det?

//>Rune

hmm.. jeg har ikke modtaget noget på rune@medions.dk ?

//>Rune

Hmm... det kommer nok.. det er jo hotmail..

omskrive det?... ja.. hvis det kommer til at virke som det skal

ahhh *G* ok..
-men hvor mange filer er det?

//>Rune

ok.. det prøver jeg så...

//>Rune

har du fået det?

har du ikke msn eller icq?

nej jeg har ik' fået det...
kom med dit ICQ nr. finder vi ud af det der...

//>Rune

122607576