表,a
字段:a.username a.password
a.fenlei
a.fenlei = 1 为 学生
2 为教员 等看你自己设置。
rs.open "select * from a where username ='"&参数&"'",conn,1,1
if not rs.eof then
if cstr(rs("password"))="参数"then
fenlei = rs("fenlei")
if int(fenlei) = 1 then
'干什么
end if
if int(fenlei) = 2 then
'干什么
end if
else
response.write "密码有误"
response.end
end if
else
response.write "无帐号"
response.end
end if