[-] 今天是: 设为首页 加入收藏
计算机 ASP ASP.NET VB JSP BS结构 管理系统 JAVA C/C++ Delphi Power Builder VFP PHP 网上书店 学生 图书 精品课程 论坛 考试 人事 基于web 企业 进销存 计算机应用 网站建设 编程 环境配置 外文翻译 电子 通信 PLC 单片机 电气 控制 智能 电源 CDMA GPRS 机械 数控车床 模具 钻床 土木工程 住宅楼 办公楼 教学楼 综合楼
您现在的位置: 爱毕业设计网 >> 计算机教程 >> 网站建设 >> 正文
菜鸟十天学会ASP教程之第九天:Session组件_建站学
编辑:vison 教程来源:互联网 指数:         ★★★
  学习目的:基本的SESSION组件,总结response,request组件。  首先,有会员系统的任何程序都会用到检测是不是用户已经登陆这个步骤。这就用到了SESSION组件,下面我们 看一个代码来说明。 <% session("login")="yes" %>  这句话的意思就是在session里面定义一个login字符串变量,值为"yes",直接可以赋值,不需要声明。是不是很简单?  如果我们做管理员登陆系统的话,首先是一段检测是不是管理员: if 是 then session("isadmin")=yes" else session("isadmin")="no" end if   在每一个需要管理员才能看的页面最前面加上: <% if not session("isaadmin")="yes" then response.redirect "login.htm" %>  这样一般用户就无法打开这个页面。解释一下response.redirect,它是转向的意思,后面的"login.htm"就是转向的文件。这样没有登陆的管理员是无法看到后面的内容的。  response组件基本就是用到response.write(),response.redirect() 分别是写字符串和转向的作用。  request基本就是request.form(),request.querystring() 分别是接受post,get方法传来的信息。  最后我们一起来制作一个简单的后台登陆管理界面,首先在myweb目录下建立一个admin文件夹,然后我们建立一个数据库名字为admin.mdb,然后我们再建立一个表,表中设置两个字段name,password,类型都是文本型的!最后退出时设置主键,保存为表名check。然后可以输入一条记录用户名:admin,密码:admin。具体建立数据库的方法请看《菜鸟十天学会ASP教程之第三天:数据库的建立》  下面我们开始编写ASP程序,首先建立一个index.asp(管理主界面)程序,代码如下: <%@language=vbscript%><%if not session("checked")="yes" then response.Redirect "login.asp" else %><%end if%>  在上面的代码中,大家可以看到用到login.asp,left.asp,right.asp程序  login.asp://登陆系统程序
 
 
管理员入口
管理员:
密 码: <%if session("check")="wrong" then response.Write "
验证错误!" end if%>
 
 
  在上面的程序中用到一个检查用户和密码是否正确的程序check.asp://核对输入的用户和密码是否正确 <% dim name,password name=request.form("name") password=request.form("password") dim exec,conn,rs exec="select *from check where(name='"&name&"' and password='"&password&"')" set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("admin.mdb") set rs=server.createobject("adodb.recordset") rs.open exec,conn if not rs.eof then rs.Close conn.Close session("checked")="yes" session("check")="right" response.Redirect "index.asp" else session("checked")="no" session("check")="wrong" response.Redirect "login.asp" end if %>  left.asp://管理导航 <%@language=vbscript%><%if not session("checked")="yes" then response.Redirect "login.asp" else %>


管理界面首页 退出

<%end if%>  exit.asp://退出系统 <%@language=vbscript%><% session("check")="" session("checked")="" response.redirect "login.asp" %>  right.asp://具体管理的内容 <%@language=vbscript%><%if not session("checked")="yes" then response.Redirect "login.asp" else %>这里是网页教学网的管理系统示例!请大家多研究使用! <%end if%>  运行时首先运行index.asp程序,运行效果部分截图如下:
教程录入:admin    责任编辑:giggs692 
  • 发表评论
  • 加入收藏
  • 加入QQ书签
  • 关闭页面
  • 网友评论(评论内容只代表网友观点,与本站立场无关!)
    • 在线咨询
    • QQ:306826066
    • QQ:281788421
    • 旺旺客服
    • 技术支持
    • 售后服务
    爱毕业设计网