December 19, 2000
Tjena kan prova denna har dock ej kollat så mycket själv på den men :
http://www.idg.se/webstudio/as.....asp471.asp
May 24, 2001
Det där var den mest idiotiska inloggningskoden jag nånsin sett!
Typisk IDG iofs...
Farbror Donan ska förklarar hur man gör...
Jag antar att din ADODB.Connection-object är öppen och redo och heter Conn
Själva tabellen heter "Users" och har kolumnerna "Username" och "Password"
Säg till om du behöver hjälp med databasen eller kopplingen
'Här börjar koden
AnvNamn = Replace(Request.Form("anvnamn"),"'","''")
Losen = Replace(Request.From("losen"),"'","''")
Set RS = Conn.Execute("SELECT COUNT(*) FROM Users WHERE Username = '" & AnvNamn & "' AND Password = '" & Losen & "'")
X = RS(0)
RS.Close
Set RS = Nothing
If X = "0" Then
'Inloggningen misslyckades, visa felmedellande eller liknande
Else
'Inloggningen lyckades, gör nåt vettigt här..
End If
'Slut på koden...
Vad som händer är att RS (ett vanligt RecordSet objekt) hämtar hur många träffar man får med det användarnamnet + lösenordet, allt med ett enda SQL-kommando.
Jag byter ut alla enkelfnuttar (') mot dubbla enkelfnuttar med Replace kommandot, annars strular det i SQL-strängen.
Sen kollar man bara om man fick 0 träffar eller inte.
1 Guest(s)