---

Hej

Jeg har et problem med min if

hvis at login er rigtigt laver den ingen fejl, men hvis det er forkert
skriver den :

Du er IKKE logget korrekt ind
Log ind igen
Du er IKKE logget korrekt ind
Log ind igen error '80020009'
Exception occurred.
/nsb/indhold.asp, line 161


Min kode er sådan :
Linje 154 : 'Læs Bruger
Linje 155 : strSQL = "Select * from administratorer Order By ID"
Linje 156 : Set rs = Conn.Execute(strSQL)
Linje 157 : Do
Linje 158 : ' Tjek om login og password er korrekte
Linje 159 : If Request.Form("login") = "" AND Request.Form = "" then
Linje 160 : Response.Write "<p align='Center'>Du skal udfylde login
felterne</p>" & vbcrlf
Linje 161 : ElseIf Request.Form("login") = "" & rs("Login") & "" AND
Request.Form("password") = "" & rs("Password") & "" Then
Linje 162 : ' Hvis korrekt sættes session til JA
Linje 163 : Session("login") = "JA"
Linje 164 : Session.Timeout = 20
Linje 165 : Response.Redirect ("indhold.asp?Mode=Administration-Loggedin")
Linje 166 : Else
Linje 167 : ' Hvis forkert sættes ingen session til NEJ
Linje 168 : Session("login") = "NEJ"
Linje 169 : Session.Timeout = 20
Linje 170 : Response.Write "<center><h2>Du er IKKE logget korrekt
ind</h2>" & vbcrlf
Linje 171 : Response.Write "<center><a class='Menu-Punkt'
href='indhold.asp?Mode=Administration'>Log ind igen</a>" & vbcrlf
End If
rs.MoveNext
Loop

--
Med Venlig Hilsen
Webmaster
Kenneth Fuglsang Christensen
Kattegatsvej 17
9700 Brønderslev
Tlf.: 98 82 21 12
E-Mail : kenneth-fuglsang@pc.dk
E-Mail 2 : admin@thecomplex.dk
ICQ : 115251242
WEB : www.thecomplex.dk

---

"Kenneth Fuglsang Christensen" <kenneth-fuglsang@pc.dk> wrote in message
news:3b4842e7$0$316$edfadb0f@dspool01.news.tele.dk...
> Hej
>
> Jeg har et problem med min if
>
> hvis at login er rigtigt laver den ingen fejl, men hvis det er forkert
> skriver den :
>
> Du er IKKE logget korrekt ind
> Log ind igen
> Du er IKKE logget korrekt ind
> Log ind igen error '80020009'
> Exception occurred.
> /nsb/indhold.asp, line 161

>[SNIP KODE]

Hei!

Har laget et lignende script som du kanskje kan ha nytte av:

<--START-->
brukernavn = Request.Form("brukernavn")
passord = Request.Form("passord")

if brukernavn = "" or passord = "" then
response.redirect("index.asp")
else

'Koble til database

mySQL = "SELECT count(brukernavn) AS countBruker FROM bruker WHERE
brukernavn='" & brukernavn & "' AND passord='" & passord & "'"

SET rs = conn.execute (mySQL)

if rs("countBruker") <> 1 then
response.redirect ("index.asp")
end if

session("login") = true
response.redirect ("index2.asp")

end if
<--SLUTT-->


--
Med vennlig hilsen

Jørgen L. Helland
jorgen@helland.com