S
shixianyong
Unregistered / Unconfirmed
GUEST, unregistred user!
sql="SELECT * From LoginUser where bh='" &
UserID &
"'"
Set oRs=Server.CreateObject("ADODB.Recordset")
oRs.open sql,conn,1,1
if oRs.bof and oRs.eof then
oRs.close
Return_Previous_Page "您輸入的登陸帳號不存在!請查証后重新輸入!"
else
if pwd<>oRs("passwd") then
oRs.close
Return_Previous_Page "您輸入的密碼錯誤!請查証后重新輸入!"
else
if trim(oRs("State"))="1" then
Return_Previous_Page "此用戶被禁用!請和管理員聯系!"
else
Session("UserID")=UserID
Session("UserName")=trim(oRs("xm"))
Session("Department")=trim(oRs("bm"))
Session("State")=trim(oRs("state"))
Session("power")=oRs("power")
Session("Email")=oRs("Email")
Session("senior_bh")=oRs("senior_bh")
oRs.Close
Set oRs=nothing
Set sql=nothing
Response.Redirect "loginok.asp"
end if
end if
%>
我想請問Set oRs=Server.CreateObject("ADODB.Recordset")
oRs.open sql,conn,1,1是什么意思﹐oRs又是什么東東
UserID &
"'"
Set oRs=Server.CreateObject("ADODB.Recordset")
oRs.open sql,conn,1,1
if oRs.bof and oRs.eof then
oRs.close
Return_Previous_Page "您輸入的登陸帳號不存在!請查証后重新輸入!"
else
if pwd<>oRs("passwd") then
oRs.close
Return_Previous_Page "您輸入的密碼錯誤!請查証后重新輸入!"
else
if trim(oRs("State"))="1" then
Return_Previous_Page "此用戶被禁用!請和管理員聯系!"
else
Session("UserID")=UserID
Session("UserName")=trim(oRs("xm"))
Session("Department")=trim(oRs("bm"))
Session("State")=trim(oRs("state"))
Session("power")=oRs("power")
Session("Email")=oRs("Email")
Session("senior_bh")=oRs("senior_bh")
oRs.Close
Set oRs=nothing
Set sql=nothing
Response.Redirect "loginok.asp"
end if
end if
%>
我想請問Set oRs=Server.CreateObject("ADODB.Recordset")
oRs.open sql,conn,1,1是什么意思﹐oRs又是什么東東