网上客房预订系统(ASP+Access+系统功能结构图+文件架构图+源代码) 第8页
图13 后台登录模块设计效果
后台登录页面所涉及的HTML表单主要元素如表3所示。
表3 后台登录页面中涉及的HTML表单元素
名称 |
类型 |
含义 |
重要属性 |
form1 |
form |
表单 |
method="post" action="inc/check.asp?action=login" |
verifycode2 |
hidden |
隐藏域 |
value="<%=session("verifycode")%>" |
Submit |
image |
图像区域 |
value="提交" src="images/12_10.gif" |
后台登录页面所涉及到的程序代码如下:
<%
dim verifycode,verifycode2
verifycode=trim(Request.Form("verifycode")) '接收验证码
verifycode2=trim(Request.Form("verifycode2"))
if verifycode<>verifycode2 then '判断输入的验证码与随机产生的验证码是否一致
response.write"<SCRIPT language=JavaScript>alert('您输入的验证码不正确。');"
response.write"location.href='../index.asp'</SCRIPT>"
else
session("verifycode")="" '清空验证码
'判断是否接收表单值
admin_name=request("admin_name") '接收用户名
admin_pass=request("admin_pass") '接收用户密码
set rs=server.createobject("adodb.recordset")
sql="select * from admin where admin_name='"&admin_name&"' and admin_pass='"&admin_pass&"'"
rs.open sql,conn,1,3
if rs.eof then
对不起,您输入的用户名、密码或验证码有误,请重新输入,谢谢!
<br><br>本软件建议您使用IE6.0以上版本,分辨率:1024*768<br><br>
否则一切后果与本软件无关,特此声明!在此<a href=../index.asp>返回</a></font>"
else
session("admin_name")=request("admin_name") '创建session("admin_name")阶段变量
response.redirect "../manage.asp" '跳转到指定的页面
end if
rs.close '关闭已打开的记录集
set rs=nothing
conn.close
set conn=nothing '将不用的对象释放掉
end if
end if
%>
管理首页/退出模块主要用于退出后台管理系统,并将Session变量清空,代码如下:
<%
session("admin_name")="" '将Session变量清空
response.redirect "../index.asp"
%>
网站管理模块主要包括更改初始信息、查看服务器信息2部分。
更改初始信息模块主要用于修改用户名、密码、公司名称。更改初始信息模块的设计效果如图14所示。
图14 更改初始信息模块设计效果
更改初始信息页面所涉及到的程序代码如下
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>