你前面那些判断用户和密码的程序是不是写好了,比如原来你的SQL是这样写的
sql="select * from userinfo where UserName='" & sName & "' And Password='" & sPwd & "'"
rs.open sql conn,1,1
if rs.eof then
Response.write "错误的用户名或密码!"
Response.End
End If
rs.close
现在改为
sql="select * from userinfo where UserName='" & sName & "' And Password='" & sPwd & "'"
rs.open sql,conn,1,1
do while Not rs.EOF
strstate = rs.fields("state")
loop
rs.close
select case strstate
case ""
Response.write "用户还没注册"
response.end
case "1"
session("User") = rs.fields(0)
……
'一些相应的操作或者赋值
case "2"
response.write "用户已经注销"
response.end
case "3"
response.write "待注销用户"
response.write
case else
response.write "不明状态用户!请与系统管理员联系"
response.end
end select