3 svar · 120 visningar · startad av Gein
Set RecSet = Server.CreateObject("ADODB.Recordset")
Kolla = "SELECT * FROM login WHERE LOGIN='username'"
RecSet.Open Kolla, Connect, adOpenStatic, adLockOptimistic
if password = RecSet("PASSWORD") then '*
Session("username") = Request.Form("username")
Session("password") = Request.Form("password")
Response.Redirect("chat.asp")
else
response.redirect("login.asp")
end if
kan det vara nåt fel här?..
Jag får undantagsfel på rad 13, det är raden som är markerad med en *
Kan det vara så att min SQL sats är fel?
------------------
"When there's no more room in hell,
the dead will walk the earth."
---------------------
http://shortenings.cjb.net
Set RecSet = Server.CreateObject("ADODB.Recordset")
Kolla = "SELECT * FROM login WHERE LOGIN='[b]"&[/b]username[b]&"[/b]'"
RecSet.Open Kolla, Connect, adOpenStatic, adLockOptimistic
if password = RecSet("PASSWORD") then '*
Session("username") = Request.Form("username")
Session("password") = Request.Form("password")
Response.Redirect("chat.asp")
else
response.redirect("login.asp")
end if
:OO
------------------
attans
Eller denna kanske är bättre
Set RecSet = Server.CreateObject("ADODB.Recordset")
Kolla = "SELECT LOGIN, F_PASSWORD FROM login WHERE LOGIN='"&username&"' AND F_PASSWORD ='"&password&"'"
RecSet.Open Kolla, Connect, adOpenStatic, adLockOptimistic
If RecSet.EOF Then
response.redirect("login.asp")
else
Session("username") = Request.Form("username")
Session("password") = Request.Form("password")
Response.Redirect("chat.asp")
end if
läggg märke till att jag ändrade fätet Password till F_PASSWORD
så här skulle jag gjort iaf :)
------------------
attans
snyggt! tackaR!
------------------
"When there's no more room in hell,
the dead will walk the earth."
---------------------
http://shortenings.cjb.net