oginok.asp
<%
session.timeout=30
if request("action")="login" then
name=trim(request.form("name"))
pwd=trim(request.form("pwd"))
if name="" or pwd="" then
response.redirect ("login.asp")
end if
set rs=server.createobject("adodb.recordset")
sql="select * from user where name='"&;name&;"'and pwd='"&;pwd&;"'"
rs.open
sql,conn,1,1
if not rs.eof then
session("name")=name
response.redirect"edit.asp"
else
response.redirect"error.asp"
response.end
end if
end if
%>
loginout.asp
<%
session("name")=""
response.write ""
response.end
%>
pwd.asp
ody>
pwd2.asp
找回密码 <% name=trim(request.form("name")) set rs=server.createobject("adodb.recordset") sql="select * from user where name='"&;name&;"'" rs.open sql,conn,1,1 if not rs.eof then %> |