---

Jeg er i gang med at lave et log ind til min side. Det ligner meget log
in'et på www.activedeveloper.dk altså hvor man kan logge ind fra menuen og
ikke skal ind på en "log in side"
det gå fint med at logge ind, men efter et sideskift falder sessionen med
brugeradgangen tilbage til False.

se http://thelounge.dk

Har er min kode til at tjekke om der er logget og hvis der ikke er evt.
logge en ind. Hvis der er logget ind skal der ikke gøres noget.
<%
if session("Brugeradgang") <> True then

strConnect = "DRIVER={MySql}; SERVER=localhost; DATABASE=thelounge_dk;
UID=UID; PWD=PWD"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strConnect
Dim strBrugernavn, strAdgangskode
strBrugernavn = Trim(Replace(request.form("Brugernavn"),"'","''" ))
strAdgangskode = Trim(Replace(request.form("Adgangskode"),"'","''" ))
SQL = "SELECT * FROM Brugere where Brugernavn = '" & strBrugernavn & "' AND
Adgangskode = '" & strAdgangskode & "'"
Set rs = Conn.Execute(SQL)
If Not (rs.BOF Or rs.EOF) Then
Session("ID") = rs("ID")
Session("Brugeradgang") = True
Else
Session("Brugeradgang") = False
End If
Conn.Close
Set Conn = Nothing
End if


VH
Lars Haugaard

If Session("Brugeradgang") = True then
Session("Brugeradgang") = True
End If
%>

---

> se http://thelounge.dk

ups det var den gamle grimme side, her er det rigtige link
http://new.thelounge.dk

---

> <%
> if session("Brugeradgang") <> True then

Kan det tænkes, at der skal være "-tegn omkring True?
altså:
if session("Brugeradgang") <> "True" then

---

Philip skrev:

>> if session("Brugeradgang") <> True then
>
> Kan det tænkes, at der skal være "-tegn omkring True?
> altså:
> if session("Brugeradgang") <> "True" then

Man kan godt sætte anførselstegn om True - så bliver det bare en
anden sammenligning. True og "True" er to forskellige værdier, men
begge kan udmærket bruges til sammenligninger. Hvis man ændrer True
til "True", skal det derfor gøres alle steder i scriptet.

Generelt er det i mine øjne en uskik at benytte "True" - risikoen
for at man forveksler den med True er for stor. If-sammenligninger
med sandhedsværdier (true/false) kan i øvrigt skrives uden selve
værdien:

If (x = True) Then
   
er det samme som

If (x)

Tilsvarende gælder:

If (x <> True)    =>    If Not (x)
If (x = False)    =>    If Not (x)
If (x <> False)    =>    If (x) [forudsat at x er initialiseret
                            og ikke er null]
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

Er der virkelig ikke nogen der ved hvad jeg skal gøre? Har jeg formuleret
mig præcist nok?

---

Lars Haugaard skrev:

> Er der virkelig ikke nogen der ved hvad jeg skal gøre? Har jeg
> formuleret mig præcist nok?

Ikke i ovenstående indlæg. Når du ikke citerer noget, er det svært
at vide hvad du refererer til (jeg ser kun ulæste indlæg).
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

"Lars Haugaard" <larshaugaard@thelounge.dk> wrote in message
news:3vFOa.14931$Kb2.726112@news010.worldonline.dk...
> Er der virkelig ikke nogen der ved hvad jeg skal gøre? Har jeg formuleret
> mig præcist nok?

Prøv nedenstående. Den virker for mig.

<% if Session("Brugeradgang") = "" then
Response.Redirect("login.asp")
end if
%>

Mvh-Svend