仓酷云

标题: ASP网站制作之之前汇集的一些材料---怎样在ASP中完成... [打印本页]

作者: 飘飘悠悠    时间: 2015-1-16 23:17
标题: ASP网站制作之之前汇集的一些材料---怎样在ASP中完成...
ASP最大的缺点在于网络的安全性和可靠性,企业将经营数据放在开放的平台上,最大的担忧就是如何保证这些数据不被其他人破坏。毛病怎样在ASP中完成毛病圈套手艺(即完成VB中的所谓的OnErrorGoTo)
代码以下(一共4个文件)
1。error1.asp(用来天生毛病)
<html>
<head>
<title>输出数据</title>
</head>

<body>

<formmethod="POST"action="error2.asp"name="form1">
<divalign="left"><tableborder="1"width="340"height="35">
<tr>
<tdwidth="143"height="11">喜好的盘算机</td>
<tdwidth="185"height="11"><inputtype="text"name="T1"size="20"></td>
</tr>
<tr>
<tdwidth="143"height="12">喜好的游戏:</td>
<tdwidth="185"height="12"><inputtype="text"name="T2"size="20"></td>
</tr>
</table>
</div><p>:<inputtype="submit"value="Submit"name="B1"><inputtype="reset"value="Reset"
name="B2"></p>
</form>
</body>
</html>

2。error2.asp

<%@Language="vbscript"%>
<%
Response.buffer=True
OnErrorResumeNext

dimconn
dimrs
setconn=server.createobject("adodb.connection")
conn.open"Example_DSN"

Iferr.number0Then
Response.Redirect"Error3.asp?number="&err.Number&"&desc="&Server.URLEncode(err.description)
EndIf
setrs=server.createobject("adodb.recordset")
rs.open"TableName",conn,3,3


Iferr.number0Then
Response.Redirect"Error3.asp?number="&err.Number&"&desc="&Server.URLEncode(err.description)
EndIf

rs.addnew
rs("field1")=request.form("field1")
rs("field2")=request.form("field2")
rs.update

Iferr.number0Then
Response.Redirect"Error3.asp?number="&err.Number&"&desc="&Server.URLEncode(err.description)
EndIf
rs.close
conn.close
setrs=nothing
setconn=nothing
%>
<html>

<head>
<title>乐成</title>
</head>

<body>

<p>操纵完成!</p>
</body>
</html>

3。error3.asp
<%@language="vbscript"%><%
response.buffer=True

dimstrNumber
dimstrdesc
dimconn
dimrs

strconn="DRIVER=MicrosoftAccessDriver(*.mdb);DBQ="&Server.MapPath("error.mdb")

strNumber=request("Number")
strDesc=request("Desc")

setconn=server.createobject("adodb.connection")
conn.openstrconn
setrs=server.createobject("adodb.recordset")
rs.open"tblError",conn,2,2
rs.addnew
rs("ErrNumber")=strNumber
rs("ErrDesc")=strDesc
rs("timeoccurred")=now()
rs.update
rs.movelast
strID=rs("id")
rs.close
setrs=nothing
conn.close
setconn=nothing


err.clear



%></p>

<html>

<head>
<title>堕落页面</title>
</head>

<body>

<h1>产生毛病</h1>
<h2>毛病ID为:<%=strID%></h2>

<h3>毛病号为:</h3>
<i><%=strNumber%>
</i>

<h3>毛病形貌为:</h3>
<i><%=strDesc%>
</i>

</body>
</html>

4。一个用来纪录毛病的数据库(Access)
共有errNumber,ErrDesc,timeoccurred三个字段</p>写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们)
作者: 只想知道    时间: 2015-1-29 06:21
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
作者: 兰色精灵    时间: 2015-2-5 23:08
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
作者: 海妖    时间: 2015-2-14 03:16
我认为比较好的方法是找一些比较经典的例子,每个例子比较集中一种编程思想而设计的。
作者: 再现理想    时间: 2015-3-11 16:31
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。
作者: 简单生活    时间: 2015-3-19 02:13
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。
作者: 愤怒的大鸟    时间: 2015-3-27 04:10
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。




欢迎光临 仓酷云 (http://ckuyun.com/) Powered by Discuz! X3.2