[asp] Login scherm - vage err

[LauPro]

Bij deze site: http://212.187.14.178/ia kan iemand niet inloggen, ik wel. De username & pass zijn goed.

Diegene die niet kan inloggen heeft mij dit gestuurd:

De pagina kan niet worden weergegeven
Er is een probleem met de pagina die u wilt openen maar die niet kan worden weergegeven.

--------------------------------------------------------------------------------

Probeer het volgende:

Klik op de knop Vernieuwen, of probeer het later nog eens.

Open de home page 212.187.14.178 , en zoek vervolgens koppelingen naar de gewenste gegevens.
HTTP 500.100 - Internal Server Error - ASP-fout
Internet Information Services

--------------------------------------------------------------------------------

Technische informatie (voor ondersteunend personeel)

Soort fout:
(0x80020009)
Er is een uitzondering opgetreden.
/ia/login.asp, line 16


Soort browser:
Mozilla/4.0 (compatible; MSIE 5.5; Windows 98; Win 9x 4.90)

Pagina:
POST 50 bytes naar /ia/login.asp

POST Data:
gebruikersnaam=KingOfDos&wachtwoord=************&B1=Login

Tijd:
donderdag 23 mei 2002, 13:00:57


Meer gegevens:
Microsoft Support

Zo'n standaardfout dus, maar als ik inlog gebeurd het dus niet. De source:

code:

Dim sErrortext, rs, sSQL

if Request.QueryString("err") = "niet_ingelogd" then
    sErrortext = "Je bent niet ingelogd."
elseif Session("gebruikersnaam") <> "" then
    sErrortext = "Je bent al ingelogd. Ga naar <a href='start.asp'>Start</a> 
om verder te gaan en klik <a href='log_uit.asp'>hier</a> om uit te loggen 
als je onder een ander account verder wilt gaan."
elseif Request.Form("gebruikersnaam") <> "" and Request.Form("wachtwoord") _
<> "" then
    
    sSQL = "SELECT * FROM users WHERE gebruikersnaam='" & _
Request.Form("gebruikersnaam") & "' AND wachtwoord='" & _
Request.Form("wachtwoord") & "'"
'REGEL 16:
    Set rs = Session("db").Execute(sSQL)
    
    if rs.Fields("status") = 0 then
        sErrortext = "Het account dat je probeert is geblokkeerd. _
Als je denk dat dit onterecht is kan je me even mailen."
    elseif not(rs.EOF) then
        Session("gebruikersnaam") = rs.Fields("gebruikersnaam")
        Session("id") = rs.Fields("id")
        
        if rs.Fields("tussenvoegsel") = "" then
            Session("naam") = rs.Fields("voornaam") & " " & _
rs.Fields("achternaam") 
        else
            Session("naam") = rs.Fields("voornaam") & " " & _
rs.Fields("tussenvoegsel") & " " & rs.Fields("achternaam")
        end if
        
        response.redirect "start.asp"
    else
        sErrortext = "Wachtwoord/gebruikersnaam onjuist!"
    end if
    
end if

De fout zit in regel 16. Weet iemand waardoor dat zou kunnen komen? Ik heb er dus geen last van

[Yoda]

Ik weet wel dat sessies en frames soms vaag doen maar dan krijg je over het algemeen geen error, dan werkt het 'gewoon' niet.

Wat je kan proberen.
-de persoon toch ff proberen in te laten loggen op de inlogpagina maar dan NIET in de frameset. Dus direct de pagina in je browser laden.
-in IE: tools->advanced->show friendly HTTP error messages uit vinken.

Op deze manier krijg je een duidelijkere error message terug.

[LauPro]

Ik zal het hem zeggen, maar wel raar.