שאלה בקשר להתחברות

למה זה לא עובד???
ורק למי שלא הבין
אני שמתי ב DB רשומה של כן/לא קוראים לה STATUS
אם היא כן זאת אומרת שהמשתמש מושעה והדף יראה
אתה משתמש לא מורשה או משהו כזה
ואם היא לא אז זה יכנס לדף המאובטח !!!!
הבנת ???
השאלה היא למה זה לא עובד לי

אוקיי עוד שאלה::

איך אני יכול לעשות שכאשר משתמש חסום נכנס זה רושם לו:
"אתה משתמש חסום"
וכאשר משתמש שטעה בסיסמא יכנס יהיה רשום לו ::
שם המשתמש או הסיסמא אינם נכונים
וכמובן כאשר הוא יכניס קוד ושם נכונים
והוא לא חסום
אז זה יכנס לו לדף המאובטח !!!!!

נזכרתי בזה
נזכרתי וגם הסתכלתי באתר של איציק ולמדתי תקוד
אבל עדיין יש בעיה הוא אומר לי

ADODB.Fields error '800a0cc1'

ADO could not find the object in the collection corresponding to the name or ordinal reference requested by the application.

/login.asp, line 24

הנה שורה 24

if rs.fields("Status") = true then

הנה הקוד של ה ElseIf

If gogo = true and session("Status") = false Then
Response.Redirect "/show_users.asp"
elseif gogo = true and session("Status") = true Then
Response.Write "<center><FONT COLOR='red'>"
Response.Write "שם המשתמש מושעה <BR> לבירור נוסף אנא פנה למנהל האתר </FONT></center>"
elseif gogo = false and session("Status") = false Then
Response.Write "<center><FONT COLOR='red'>"
Response.Write "שם המשתמש או הסיסמא אינם נכונים</FONT></center>"
End If

נראה לי שהוא כן מכיל
סתכלי הנה הקוד השלם !!!!!

%>
Dim conn, rs, SQLstr, gogo

Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
conn.Open "myDSN"

SQLstr="SELECT ID,Password,Admin FROM godonodo "
SQLstr= SQLstr & "WHERE Login='" & Request("Login") & "'"
rs.Open SQLstr,conn

If Rs.EOF Then
Else
If Request("Password")<>rs("Password") Then
gogo=false
Else
gogo=true
Session("ID") = rs("ID")
if rs.fields("Admin") = true then
session("Admin") = true
Else
session("Admin") = false
if rs.fields("Status") = true then
session("Status") = true
else
session("Status") = false
End If
End If
End If
End If

rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing

If gogo = true and session("Status") = false Then
Response.Redirect "/show_users.asp"
elseif gogo = true and session("Status") = true Then
Response.Write "<center><FONT COLOR='red'>"
Response.Write "שם המשתמש מושעה <BR> לבירור נוסף אנא פנה למנהל האתר </FONT></center>"
elseif gogo = false and session("Status") = false Then
Response.Write "<center><FONT COLOR='red'>"
Response.Write "שם המשתמש או הסיסמא אינם נכונים</FONT></center>"
End If

%>