|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了session|教程|十天学会 上一节:修正纪录
进修目标:基础的SESSION组件,总结response,request组件。
起首,有会员体系的任何程序城市用到检测是否是用户已上岸这个步骤。这就用到了SESSION组件,上面我们看一个代码来讲明。
<%
session("login")="yes"
%>
这句话的意义就是在session内里界说一个login字符串变量,值为"yes",间接能够赋值,不必要声明。是否是很复杂?
假如我们做办理员上岸体系的话,起首是一段检测是否是办理员:
if是then
session("isadmin")=yes"
else
session("isadmin")="no"
endif
在每个必要办理员才干看的页面最后面加上:
<%
ifnotsession("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%>
<%ifnotsession("checked")="yes"then
response.Redirect"login.asp"
else
%>
<html>
<head>
<title>办理界面</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
</head>
<framesetcols="167,*"frameborder="YES"border="1"framespacing="1"rows="*"bordercolor="#666666">
<framename="leftFrame"scrolling="auto"noresizesrc="left.asp">
<framename="mainFrame"src="right.asp">
</frameset>
<noframes>
<bodybgcolor="#FFFFFF"text="#000000">
</body>
</noframes>
</html>
<%endif%>
在下面的代码中,人人能够看到用到login.asp,left.asp,right.asp程序
login.asp://上岸体系程序
<html>
<head>
<title>办理员出口</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<styletype="text/CSS">
<!--
.topic{font-family:"宋体";font-size:11pt;font-weight:bold;color:#FFFFFF}
.font{font-family:"宋体";font-size:10pt;font-weight:normal;color:#000000}
.table{border-color:#666666black;border-style:solid;border-top-width:1pt;border-right-width:0px;border-bottom-width:1pt;border-left-width:0px}
.text{border:1pt#999999solid;height:15pt}
-->
</style>
</head>
<bodytext="#000000"topmargin="0"bgcolor="#FFFFFF">
<tablewidth="100%"border="0"cellpadding="0"cellspacing="0"align="center"height="100%">
<tr>
<tdheight="129"valign="top"colspan="3"></td>
</tr>
<tr>
<tdwidth="230"height="170"valign="top"></td>
<tdvalign="top"width="277">
<tablewidth="100%"border="0"cellspacing="1"cellpadding="0"height="100%"bgcolor="#000000"align="center">
<tr>
<tdalign="center"valign="middle"height="167">
<formname="form1"method="post"action="check.asp">
<tablewidth="100%"border="0"cellspacing="0"cellpadding="0"height="100%">
<trbgcolor="#62892C">
<tdheight="31"class="topic"colspan="2">
<divalign="center">办理员出口<br>
</div>
</td>
</tr>
<tr>
<tdbgcolor="#87bc3c"colspan="2"class="table">
<divalign="center"><spanclass="font">办理员:</span>
<inputtype="text"name="name"class="text"size="20">
<br>
<spanclass="font">密码:</span>
<inputtype="password"name="password"class="text"size="20"><%ifsession("check")="wrong"thenresponse.Write"<br><spanclass=font><fontcolor=red>考证毛病!</font></span>"endif%>
</div>
</td>
</tr>
<tr>
<tdbgcolor="#87bc3c"width="52%">
<divalign="center"class="font">
<inputtype="reset"name="Submit2"value="重置"class="text">
</div>
</td>
<tdbgcolor="#87bc3c"width="48%">
<divalign="center"class="font">
<inputtype="submit"name="Submit22"value="提交"class="text">
</div>
</td>
</tr>
</table></form>
</td>
</tr>
</table>
</td>
<tdwidth="241"valign="top"></td>
</tr>
<tr>
<tdheight="123"valign="top"colspan="3"></td>
</tr>
</table>
</body>
</html>
在下面的程序顶用到一个反省用户和暗码是不是准确的程序check.asp://查对输出的用户和暗码是不是准确
<%
dimname,password
name=request.form("name")
password=request.form("password")
dimexec,conn,rs
exec="select*fromcheckwhere(name="&name&"andpassword="&password&")"
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath("admin.mdb")
setrs=server.createobject("adodb.recordset")
rs.openexec,conn
ifnotrs.eofthen
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"
endif
%>
left.asp://办理导航
<%@language=vbscript%>
<%ifnotsession("checked")="yes"then
response.Redirect"login.asp"
else
%>
<html>
<head>
<title>办理界面</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
</head>
<bodytext="#000000"topmargin="0"bgcolor="#ffffff"leftmargin="10">
<divalign="center"><ahref="index.asp"target="_parent"><br>
<br>
办理界面首页</a><ahref="exit.asp"target="_parent">加入</a><br>
<br>
</div>
</body>
</html>
<%endif%>
exit.asp://加入体系
<%@language=vbscript%>
<%
session("check")=""
session("checked")=""
response.redirect"login.asp"
%>
right.asp://详细办理的内容
<%@language=vbscript%>
<%ifnotsession("checked")="yes"then
response.Redirect"login.asp"
else
%>
<html>
<title>办理界面</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
</head>
<bodybgcolor="#ffffff"text="#000000"topmargin="20"class="title">
这里是网页教授教养网的办理体系示例!请人人多研讨利用!
</body>
</html>
<%endif%>
运转时起首运转index.asp程序,运转效果部分截图以下:
下一节:分页手艺
ASP最大的缺点在于网络的安全性和可靠性,企业将经营数据放在开放的平台上,最大的担忧就是如何保证这些数据不被其他人破坏。 |
|