Login - skapa session, visas ej

Hej!

Gor ett loginskript, forstar dock inte varfor den inte vill skriva ut access_level! Inga felmess, det skrivs inte ut bara, sql2 ar det som ska hamta den informationen!

<%
If request.form("pass") = "" OR request.form("usrname") = "" then
response.redirect "login.asp"
else
'### Databaskoppling
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("/horjavel/db/members.mdb")

	strUser = replace(request.form("usrname"),"'","''")
	strPassw = replace(request.form("pass"),"'","''")

sql = "select 1 from members Where falt1 = '" & strUser & "' and falt2 = '" & strPassw &"'"
set rs1 = objConn.execute(sql)

If rs1.eof then
response.write "Access Denied!"
else
sql2 = "select * from members where falt1 = '" & strUser & "'"
response.write sql2
set rs2 = objConn.Execute(sql2)

session("namn") = strUser
session("level") = rs2("access_level")

response.write "<font face=""Verdana"" size=""2"">"
response.write "Logged on as: <b>"& session("namn") & "</b>"
response.write "<br>Access level: <b> "& session("level") &"</b>."
response.write "<br><a href=""login.asp?reason=logout"">Logga ut</a>"
response.write "</font>"
end if
end if
%>
[/red]