adminlog.asp

来自「可作为课程设计或者毕业设计 也可以作为学校精品课程网站使用」· ASP 代码 · 共 28 行

<!--#include file="../code/function.asp"-->
<%
response.Charset="utf-8"
if request("submit")<>"" then
conn_open()
set rs=conn.execute("select [密码] from [管理员] where [用户名]='"&rqst("u",1)&"'")
if not rs.eof then 
if rqst("p",1)=rs("密码") then
response.Cookies("uname")= rqst("u",1)
response.Redirect("admin.asp")
else
response.Write("登陆失败！")
end if
else
response.Write("登陆失败！")
end if
conn_close()
else
response.Write("请登陆！<br />")
end if
%>
<form action="adminlog.asp" method="get">
用户名：<input name="u" type="text" />
密&nbsp;码：
<input name="p" type="password" />
<input name="submit" type="submit" value="登陆" />
</form>