后台管理系统登陆如下: 内容来自论文无忧网 www.paper51.com
图4.19 酒店管理系统后台管理系统登陆页面 http://www.paper51.com 系统管理员的登陆是利用JavaScript编写,检测用户输入信息是否合法的函数,并通过单击【登陆】按钮调用该函数,判断用户名或密码是否有误,如果有误,系统将给予提示。当用户输入合法信息后,提交该表单,完整代码如下: copyright paper51.com <!-- #include file="../include/bkconn.asp" --> //为数据库连接文件 paper51.com <% http://www.paper51.com
if Request("userID")<>"" then paper51.com
sql="select *from users where userID='" & trim(request("userID")) &"' and Password='" &replace(trim(request("password")),"'","''") &"'"//连接用户名和密码 http://www.paper51.com 'response.writesql 内容来自论文无忧网 www.paper51.com
'response.End 内容来自www.paper51.com set rs =conn.Execute(sql) paper51.com if not (rs.eof orerr) then paper51.com session("userID")=rs("userID") http://www.paper51.com session("userClass")=rs("userClass") 内容来自www.paper51.com response.redirect"administrationgdvh.asp" copyright paper51.com
else paper51.com
%> copyright paper51.com <scriptlanguage=Javascript> 内容来自www.paper51.com alert("错误!请重新输入"); 内容来自www.paper51.com window.history.go(-1); 内容来自论文无忧网 www.paper51.com
</script> http://www.paper51.com <% 内容来自www.paper51.com end if 内容来自www.paper51.com
else 内容来自www.paper51.com %> copyright paper51.com 当管理员或其他人员没有输入帐号和密码直接登陆时,系统将会出现登陆超时字样,保护系统的安全性,其代码如下: http://www.paper51.com <% 内容来自www.paper51.com if not session("userClass")>=1 then%> copyright paper51.com
<script language=Javascript> 内容来自www.paper51.com <!-- http://www.paper51.com alert("超时,请请重新登陆") 内容来自论文无忧网 www.paper51.com window.history.go(-1) 内容来自www.paper51.com
--> http://www.paper51.com
</script> copyright paper51.com <% 内容来自www.paper51.com
response.End copyright paper51.com end if paper51.com %> copyright paper51.com 房务管理系统如下: 内容来自论文无忧网 www.paper51.com 图4.20房务管理系统页面 内容来自论文无忧网 www.paper51.com 会员管理系统如下: copyright paper51.com 图4.21 会员管理系统页面 paper51.com
管理员有权限修改删除会员的资料,修改和删除的代码如下: http://www.paper51.com 首先是修改的代码: copyright paper51.com <% copyright paper51.com
if Request("modifyPassword")=1 then http://www.paper51.com ifRequest("password1")<>Request("password2") then 内容来自www.paper51.com response.write"密码、确认密码不同<br><a href='Javascript:window.history.go(-1)'>返回</a>" copyright paper51.com response.End 内容来自论文无忧网 www.paper51.com end if paper51.com
modifyPassword=1 http://www.paper51.com end if 内容来自www.paper51.com
' response.writemodifyPassword 内容来自论文无忧网 www.paper51.com ' response.End http://www.paper51.com
Set cmdTemp = Server.CreateObject("ADODB.Command") http://www.paper51.com Set InsertCursor = Server.CreateObject("ADODB.Recordset") paper51.com cmdTemp.CommandText = "SELECT * FROM member WHERE id="&Request("id") http://www.paper51.com
cmdTemp.CommandType = 1 paper51.com Set cmdTemp.ActiveConnection = conn 内容来自论文无忧网 www.paper51.com InsertCursor.Open cmdTemp, , 1, 3 http://www.paper51.com InsertCursor("memberID") =Request("memberID") 内容来自www.paper51.com
InsertCursor("name") =Request("name") paper51.com InsertCursor("sex") =Request("sex") copyright paper51.com InsertCursor("level") =Request("memberlevel") 内容来自www.paper51.com |