Avatar billede markm Nybegynder
07. november 2000 - 16:17 Der er 4 kommentarer og
1 løsning

Fejl

Jeg har endelig fået et asp som ser ud som på adressen : www.zequenze.dk/test/login.asp
Hvad gør jeg galt ??
Avatar billede r-bj Nybegynder
07. november 2000 - 16:22 #1
må jeg se koden????
Avatar billede markm Nybegynder
07. november 2000 - 16:24 #2
Til hvilken en fil...Login asp eller hva ??
Avatar billede markm Nybegynder
07. november 2000 - 16:25 #3
<%
\' Hvis der er blevet trykket på knappen \"Login\"
If Request.Form(\"Action\") = \"Login\" Then
    \' Her forberedes de indtastede værdier til validering
    strUID = Trim(Replace(Request.Form(\"Brugernavn\"),\"\'\",\"\"))
    strPWD = Trim(Replace(Request.Form(\"Adgangskode\"),\"\'\",\"\"))

    \' Hvis der er skrevet noget i både brugernavn og adgangskode
    If Len(strUID) > 0 And Len(strPWD) > 0 Then

        \' DSNLess forbindelse til databasen
        Set myConn = Server.CreateObject(\"ADODB.Connection\")
        myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"login_2000.mdb\")

        \' Opbygning af SQL streng
        strSQL = \"SELECT UserID FROM Users\"&_
            \" WHERE (Username = \'\" & strUID & \"\')\"&_
            \" AND (Password = \'\" & strPWD & \"\')\"

        Set rs = myConn.Execute(strSQL)
        If Not (rs.BOF Or rs.EOF) Then
            \' Hvis brugeren fandtes i databasen
            intUID = rs(\"UserID\")
        Else
            \' Hvis brugeren ikke fandtes i databasen
            strERR = \"Du blev ikke godkendt af systemet\"
        End If

        \' Rydder op i vores connection objekt
        myConn.Close
        Set myConn = Nothing

        If Len(intUID) Then
            \' Hvis variablen intUID indeholder en værdi sættes denne i sessionen \"UserID\" og brugeren bliver sendt videre
            Session(\"UserID\") = intUID
            Response.Redirect(\"beskyttet.asp\")
        End If
    Else
        \' Hvis der ikke var angivet brugernavn og adgangskode
        strErr = \"Du skal skrive både brugernavn og adgangskode\"
    End If

    If Len(strErr) > 0 Then
        \' Her laves fejlmeddelsen om til rød skrift
        strErr = \"<p><font color=red>\" & strErr & \"</font></p>\"
    End If
End If
%>
<html><head>
<title>Login script</title>
</head><body>
<form method=\"POST\" action=\"login.asp\">
  <p><font size=\"4\">Angiv brugernavn og adgangskode</font></p><%=strErr%>
  <table border=\"0\">
    <tr>
      <td width=\"50%\">Brugernavn:</td>
      <td width=\"50%\"><input type=\"text\" name=\"Brugernavn\" size=\"20\"> (test)</td>
    </tr>
    <tr>
      <td width=\"50%\">Adgangskode:</td>
      <td width=\"50%\"><input type=\"password\" name=\"Adgangskode\" size=\"20\">
        (test)</td>
    </tr>
  </table>
  <p><input type=\"submit\" value=\"Login\" name=\"Action\"></p>
</form>
</body></html>
Avatar billede tdaugaard Nybegynder
07. november 2000 - 18:25 #4
HTTP Error 404
404 Not Found

The Web server cannot find the file or script you asked for. Please check the URL to ensure that the path is correct.

Please contact the server\'s administrator if this problem persists.
Avatar billede markm Nybegynder
09. november 2000 - 19:58 #5
har svaret selv
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester