Avatar billede bbbworld Nybegynder
05. juni 2004 - 21:48 Der er 19 kommentarer og
1 løsning

Login hjælp!

Jeg har et login system, hvor jeg har et lille problem! Når der trykkes på login knappen, kan siden login.asp ikke findes - sjovt nok er det denne side loginsystemet er på... Kan ikke lige se fejlen!!!

<%
SET RS = Server.CreateObject("ADODB.Connection")
rs.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(".../database/login.mdb")

If Request("mode") = "Check" then

Function unQuote(strTekst)
  strTekst = Trim(strTekst)
  unQuote = Replace(strTekst,"%","53")
End Function

    ' Gemmer formfelterne i Variabler
        strUsername = unQuote(request("Brugernavn"))
        strPassword = unQuote(request("Password"))

  Sql = "Select Count(*) as Found from login where (brugernavn= '" & strBrugernavn  & "') and (password ='" & strPassword  & "')"
  Set LO = RS.Execute(Sql)
  if LO("Found") = 0 then
    Session("login") = ""
    error = "Du har ingen adgang"
  else
  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(".../database/login.mdb")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  strSQL = "SELECT * FROM login where (brugernavn = '" & Request("brugernavn") & "') and (password ='" & Request("password") & "')"
  Set ez = myConn.Execute(strSQL)
    Session("login") = "Velkommen"
    Response.Redirect "http://www.bruger.service2004.dk/minside.asp"
    EZ.Close
    RS.Close
    Conn.Close
  end if
end if
%>

<form method="POST" action="login.asp">
<input type="hidden" name="mode" VALUE="Check">

Username:
<input class='text' type='text' name='username' size='15' style='font-family: Verdana; font-size: 8 pt' value="<%=strbrugernavn%>">
<br>
font class="header">
Password:
<input class="text" type="password" value="<%=strpassword%>" name="password" size="15" style="font-family: Verdana; font-size: 8 pt">
<input class="text" type="submit" value="Login" name="submit" style="font-family: Verdana; font-size: 8 pt">
<%=error%>
</form>

Håber I kan se fejlen!
Mvh bbbworld
Avatar billede thesurfer Nybegynder
05. juni 2004 - 21:51 #1
Det vil nok være bedre med: unQuote = Replace(strTekst,"'","")
Avatar billede thesurfer Nybegynder
05. juni 2004 - 21:52 #2
Avatar billede bbbworld Nybegynder
05. juni 2004 - 21:57 #3
Hold kæft! Det var jeg sku' blind! Men hvad skal jeg gøre for at for lede brugere over til siden http://www.bruger.service2004.dk/minside.asp?
Avatar billede thesurfer Nybegynder
05. juni 2004 - 21:59 #4
filen http://www.bruger.service2004.dk/minside.asp eksisterer jo ikke..?

- hvornår skal brugeren sendes over til minside.asp
Avatar billede bbbworld Nybegynder
05. juni 2004 - 22:02 #5
Siden eksisterer, der er beskyttelse på siden...
<%
If session("login") = "" Then
Response.redirect("login.asp")
End if
%>

De skal sendes derover ved klik på login knappen...
Avatar billede ellebaek Nybegynder
05. juni 2004 - 22:02 #6
hmm...
Hvorfor er det du finder oplysninger om brugeren når du ikke bruger dem til noget ?
altså det her:
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(".../database/login.mdb")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  strSQL = "SELECT * FROM login where (brugernavn = '" & Request("brugernavn") & "') and (password ='" & Request("password") & "')"
  Set ez = myConn.Execute(strSQL)

samtidig, hvis filen ligger på din egen server, så ville jeg nøjes med at bruge følgende:
Response.Redirect "minside.asp"
Avatar billede ellebaek Nybegynder
05. juni 2004 - 22:04 #7
men som surfer skriver, så er der en fejl i noget med din redirect..
hvis man ikke er logget ind, så bliver man sendt til login2.asp ?
Avatar billede bbbworld Nybegynder
05. juni 2004 - 22:10 #8
Hold da helt ferie! Nu virker det! Troede man skulle medtage subdomænet i response redirect!

Tak til jer begge! I hjalp begge på vej, men tror ellebaek havde svaret...
Avatar billede ellebaek Nybegynder
05. juni 2004 - 22:15 #9
jeg ligger et svar ;-)
Men kig lige på det første jeg skrev i min kommentar..
Avatar billede bbbworld Nybegynder
05. juni 2004 - 22:18 #10
Jeg har lige fundet ud af, at det ikke virker alligevel! Havde to minside sider... Jeg tror ikke helt jeg forstår, hvad du mener!!!
Avatar billede ellebaek Nybegynder
05. juni 2004 - 22:20 #11
hvad er det der ikke virker nu..

Jeg mener med min kommentar at de linier jeg har skrevet deroppe ikke er nødvendige da du ikke bruger de informationer du henter ud til noget..
Du benytter jo kun en enkelt session.
Avatar billede bbbworld Nybegynder
05. juni 2004 - 22:26 #12
Det er stadigvæk response.redirect som åbenbart volder problemer... Jeg benytter kun en enkelt session, da brugerne er er studiekammarater, der får tildelt et password de kan bruge...
Avatar billede bbbworld Nybegynder
05. juni 2004 - 22:27 #13
DVS. der skal ikke gemmes yderligere oplysninger osv.
Avatar billede ellebaek Nybegynder
05. juni 2004 - 22:32 #14
response.redirect gør hvad man beder den om..
Vil det sige at man bliver sendt retur selvom man er logget ind?

Hvis du ikke skal gemme mere, så slet de linier.
Avatar billede bbbworld Nybegynder
05. juni 2004 - 22:41 #15
Den fortæller at login.asp ikke findes!
Når jeg fjerner response.redirect får jeg denne fejl


Microsoft VBScript runtime error '800a01a8'
Object required: 'Conn'
/login.asp, line 177
Avatar billede thesurfer Nybegynder
05. juni 2004 - 23:01 #16
kigger lige på det i morgen.. skal i seng nu.. totalt smadret..
Avatar billede bbbworld Nybegynder
05. juni 2004 - 23:01 #17
Mange tak for hjælpen so far... Sov godt! Vil bakse lidt videre...
Avatar billede ellebaek Nybegynder
05. juni 2004 - 23:03 #18
slet den her linie..
Conn.Close
Avatar billede bbbworld Nybegynder
05. juni 2004 - 23:11 #19
Nu har jeg bakset lidt med det! Har valgt at have login.asp i subdomænet bruger... Så nu virker det... Du skal alligevel have dine point... Tak for hjælpen...
Avatar billede ellebaek Nybegynder
05. juni 2004 - 23:12 #20
velbekomme..

Husk at slette linien: conn.close ;-)
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

Seneste spørgsmål Seneste aktivitet
I dag 10:21 Ny printer, men hvilken Af mort1 i Printere
I går 19:41 USB på Linux Af Uvanga i Linux
12/0818:26 Hvilken type mus Af mort1 i PC
11/0813:21 ms Forms Af leahcim i Andet software
10/0821:30 Blokeret på Snapchat? Af LineP i Chat & Messaging