Hanne Kaarsberg wrote in dk.edb.internet.webdesign.serverside.asp:
> Linjer ser sådanne ud:
> Som omtalt virker det helt fint på
http://asp.darak.dk
> men ikke på localhost.
>
> Jeg vil være utrolig glad for hjælp, da jeg er ret ny i det med
> ASP og web udvikling, men kender meget til Access og VBA.
> Hilsen Hanne
>
> --------
> <%
> If Request.Form("Action") = "Login" Then
> strUID = Trim(Replace(Request.Form("medlemsnr"),"'",""))
> strPWD = Trim(Replace(Request.Form("postnr"),"'",""))
>
> ' 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("medlem.mdb")
>
> ' Opbygning af SQL streng
> strSQL = "SELECT * FROM medlem" &_
> " WHERE (medlemsnr = " & strUID & ") "&_
> " AND (postnr = " & strPWD & ") "
>
> Set rs = myConn.Execute(strSQL)
> If Not (rs.BOF Or rs.EOF) Then
> ' Hvis brugeren fandtes i databasen
> intUID = rs("medlemID")
> Else
> ' Hvis brugeren ikke fandtes i databasen
> strERR = "Du blev ikke godkendt af systemet"
> End If
>
> 'test om betaling er ok
> ' if re.("betaltar") <> '2001' then
> ' strerr_betalt = "Din betaling er ikke registreret! -
Kontakt
> Hanne Kaarsberg"
> ' end if
>
> ' Rydder op i vores connection objekt
> myConn.Close
> Set myConn = Nothing
>
> If Len(intUID) Then
> session("medlemID") = intUID
> Response.Redirect("beskyttet.asp")
> End If
> Else
> ' Hvis der ikke var angivet brugernavn og adgangskode
> strErr = "Du skal skrive både medlemsnr og postnr"
> 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
> ' If Len(strErr_betalt) > 0 Then
> ' ' Her laves fejlmeddelsen om til rød skrift
> ' strErr = "<p><font color=red>" & strErr & "</font></p>"
> ' End If
> 'End If
>
> %>
>
>
>
>
> --
> Brug Validator service:
http://www.html.dk/validator
> - Tast din URL én gang, og validér dokumentet hos 12 validatorer
> - Understøtter HTML, CSS og søgemaskineoptimering
Glem dette indlæg, det er lagt forkert
--
Brug Validator service:
http://www.html.dk/validator
- Tast din URL én gang, og validér dokumentet hos 12 validatorer
- Understøtter HTML, CSS og søgemaskineoptimering