|
<% if request("action")="dl" then
names=request("name")
pws=request("pws")
set rs=server.createobject("adodb.recordset")
sql="select * from user where name='"&names&"' and pws='"&pws&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.Write ""
else
if rs("admin")=0 then
response.Write ""
else
session("username") = rs("name")
session("userpws") =rs("pws")
response.redirect "login.asp"
end if
end if
end if%>
|
|
