hej igen, har ett till problem...
När man ska logga in funkar det om man har rätt anv.namn + lösen, men om men skriver nåt som finns i databasen så kommer en "Sidan kunde inte visas"...
Feltyp:
(0x80020009)
Undantag inträffade.
/sida/go.asp, line 1351
Hurska jag göra för att det ska komma en "You gotta be a member to login..." alternativt en ruta som kommer upp och säger att det e fel användarnamn / lösen..
såhär ser koden ut:
<% if request.querystring("menu") = "login2" then
Show = "SELECT * FROM users Where Username='" & Request.Form("field1") & "'"
rs.Open Show, Connect, adOpenStatic, adLockOptimistic
if rs("Username") = request.form("field1") AND rs("Password") = request.form("field2") then
Session("Username") = rs("Username")
rs.Close
Response.Redirect "go.asp?admin=admin"
Session.Timeout=30
else %>
You gotta be a member to login...
<% end if
end if %>
<% If Request.Querystring("menu") = "login2" Then
strShow = "SELECT * FROM users Where Username='" & Request.Form("field1") & "' AND Password = '"& Request.form("field2") &"'"
Set objRS = Connect.Execute(strShow)
If objRS.EOF Then
Response.Write "You gotta be a member to login..."
Else
Session("Username") = rs("Username")
objRS.Close
Set objRS = Nothing
Response.Redirect "go.asp?admin=admin"
Session.Timeout=30
End if
End if
%>
<%
if request.querystring("menu") = "login2" then
Show = "SELECT 1 FROM users Where Username='" & _
Request.Form("field1") & _
"' and [password]='"& request.form("field2") &"'"
set rs = connect.execute(show)
if not rs.eof then
Session("Username") = rs("Username")
else
session("username") = ""
end if
rs.Close
connect.close
if session("username") <> "" then
Session.Timeout=30
Response.Redirect "go.asp?admin=admin"
else %>
You gotta be a member to login...
<% end if
end if %>
ok nu funkar det!
men jag vill slänga in detta nånstans oxo... frågan e vart?
när man loggat in ska den kolla av vilken "åtkomst" man har på sidan...
såhär ser den ut nu:
<%
if request.querystring("menu") = "login2" then
Show = "SELECT 1 FROM users Where Username='" & _
Request.Form("field1") & _
"' and [password]='"& request.form("field2") &"'"
set rs = connect.execute(show)
if not rs.eof then
Session("Username") = Request.Form("field1")
else
Session("username") = ""
end if
rs.close
if Session("username") <> "" then
Session.Timeout=30
Response.Redirect "go.asp?admin=admin"
else %>
You gotta be a member to login...
<% end if
end if %>
detta vill jag slänga in:
if rs("Boss") = "YES" then
Session("Boss") = "YES"
elseif rs("Boss") = "NO" then
Session("Boss") = "NO"
end if
if rs("Admin") = "YES" then
Session("Admin") = "YES"
elseif rs("Admin") = "NO" then
Session("Admin") = "NO"
end if
Show = "SELECT boss,admin FROM users Where Username='" & _
Request.Form("field1") & _
"' and [password]='"& request.form("field2") &"'"
set rs = connect.execute(show)
if not rs.eof then
Session("Username") = rs("Username")
Session("Boss") = rs("Boss")
Session("Admin") = rs("Admin")
else
session("username") = ""
end if
Show = "SELECT 1 FROM users Where Username='" & _
Request.Form("field1") & _
"' and [password]='"& request.form("field2") &"'"
set rs = connect.execute(show)
if not rs.eof then
Session("Username") = Request.Form("field1")
else
Session("username") = ""
end if
mot
Show = "SELECT boss,admin FROM users Where Username='" & _
Request.Form("field1") & _
"' and [password]='"& request.form("field2") &"'"
set rs = connect.execute(show)
if not rs.eof then
Session("Username") = rs("Username")
Session("Boss") = rs("Boss")
Session("Admin") = rs("Admin")
else
session("username") = ""
end if