Jeg tror at i alle misforstår mig... Når jeg sender password'et med en formular og method=post skriver den det i adresselinien... Skal den jo ikk... ;)
Synes godt om
Slettet bruger
22. september 2003 - 15:26#7
ikke med post, der skulle den kun sende det, det er med get at den sender det til adresselinien...
Du skulle ikk lige kunne fortælle mig hvordan jeg får den til at tjekke brugernavn og password som ligger i en .mdb ??
Synes godt om
Slettet bruger
22. september 2003 - 15:57#13
du laver et database udtræk og sammenligner.... kunne evt. se sådanne ud:
<% strUsername = Trim(Replace(Request.Form("BRUGERNAVN"),"'","")) strPassword = Trim(Replace(Request.Form("PASSWORD"),"'","")) strSQL ="SELECT * FROM tabel WHERE UCase(BRUGERNAVN) = '" & UCase(strUsername) & "' AND UCase(PASSWORD) = '" & UCase(strPassword) & "'" set objRs = conn.execute(strSQL) if not objRs.EOF then if LCase(objRs("BRUGERNAVN")) = LCase(strUsername) then ' OK else ' Fejl end if else ' Fejl end if %>
Hmm... Kan du ikk sætte nogle forklaringer ind i så jeg også forstår hvad der gør hvad? ;)
Synes godt om
Slettet bruger
22. september 2003 - 16:30#15
sådanne:
<% ' strUsername henter brugernavn fra login formen, husk at rette BRUGERNAVN til dit felt strUsername = Trim(Replace(Request.Form("BRUGERNAVN"),"'","")) ' strPassword henter password fra login formen, husk at rette PASSWORD til dit felt strPassword = Trim(Replace(Request.Form("PASSWORD"),"'","")) ' Her sammenlignes der med data fra din database, husk at rette til dine egne info strSQL ="SELECT * FROM tabel WHERE UCase(BRUGERNAVN) = '" & UCase(strUsername) & "' AND UCase(PASSWORD) = '" & UCase(strPassword) & "'" ' udpakker SQL sætningen set objRs = conn.execute(strSQL) ' Resten giver vist sig selv ;O) if not objRs.EOF then if LCase(objRs("BRUGERNAVN")) = LCase(strUsername) then ' OK else ' Fejl end if else ' Fejl end if %>
Hmm... Jeg får følg. fejl: Fejltype: Microsoft OLE DB Provider for ODBC Drivers (0x80040E37) [Microsoft][ODBC Microsoft Access-driver] Microsoft Jet-databasemotoren kan ikke finde inputtabellen eller forespørgslen "tabel". Kontroller, at den findes, og at navnet er stavet korrekt. /Admin_login_handler.asp, line 18
Min Admin_login_handler.asp er følg: <% Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " DSN = DSN & "DBQ=" & Server.MapPath("cgi-bin/spr-lanparty.mdb") Conn.Open DSN
strSQL = "Select * from tbl_admins" Set rsGamers = Conn.Execute(strSQL) %> <% ' strUsername henter brugernavn fra login formen, husk at rette BRUGERNAVN til dit felt strUsername = Trim(Replace(Request.Form("BRUGERNAVN"),"'","")) ' strPassword henter password fra login formen, husk at rette PASSWORD til dit felt strPassword = Trim(Replace(Request.Form("PASSWORD"),"'","")) ' Her sammenlignes der med data fra din database, husk at rette til dine egne info strSQL ="SELECT * FROM tabel WHERE UCase(User) = '" & UCase(strUsername) & "' AND UCase(Password) = '" & UCase(strPassword) & "'" ' udpakker SQL sætningen set objRs = conn.execute(strSQL) ' Resten giver vist sig selv ;O) if not objRs.EOF then if LCase(objRs("BRUGERNAVN")) = LCase(strUsername) then ' OK else ' Fejl end if else ' Fejl end if %> <% Conn.Close Set Conn = Nothing %>
Hmm.. ok, ellers tak... Jeg synes bare at jeg prøvede på vildt mange forskellige måder... ;)
Synes godt om
Slettet bruger
22. september 2003 - 22:17#24
helt okay..... men så har du det til en anden god gang
Synes godt om
Ny brugerNybegynder
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.