%
name=session("username")
password=session("password")
if name="" or password="" then
response.redirect "login.asp?id=5"
end if
set rs=server.createobject("adodb.recordset")
sql="select * from students where petname='"&name&"'"
rs.open sql,conn,1,3
id=rs("id")
petname=rs("petname")
regtime=rs("regtime")
email=rs("email")
level=rs("level")
rs.close
set rs=nothing
if level=0 then
lev="管理员"
elseif level=1 then
lev="普通会员"
end if
%>