当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP实用大全-ASP服务器组件(7)

ASP
asp分页(自己整理的2个分页程序)
ASP常用的系统配置函数
雨哲防采集策略之列表篇
雨哲浅谈关于防采集而不影响收录内容篇
asp数据库连接函数
ajax XMLHTTP Post Form时的表单乱码综合解决
ASP注入详细命令40条
用ASP实现MSSQL用户密码破解
ASP创建对象的两种方法比较
ASP字符串转换为整形、双精度型、布尔
ASP计算str2在str1中出现的次数
asp采集抓取网上房产信息的代码
ASP注册登陆实例代码
ASP中使用FileSystemObject时提高性能的方法
分享一个好东东,动态Include文件 (Dynamic File Includes)
解决 JScript 中使用日期类型数据时出现类型错误的问题
在ASP里面创建GUID
在JScript中使用缓存技术的实际代码
ASP javascript Application对象的Contents和StaticObjects做Cache的一些经验
海阳2006+功能中的潜水王

ASP实用大全-ASP服务器组件(7)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 103 ::
收藏到网摘: n/a

ASP服务器组件

ASP服务器组件编程心得

     使用ASP编程的一大优点是可以使用众多的服务器组件(ActiveX Server Components)。这些组件提供诸如广告轮显(Ad Rotator)、浏览器兼容(Browser Capabilities)、数据库存取(Database Access)、文件超链接(Content Linking)、文件存取(File Access)等等功能。使用服务器组件,可以通过非常简单的方式高效率地完成各种复杂的工作。
 一般,ASP的各个组件通常使用 Server.CreateObject 方法来创建。例如,创建一个AD Rotator 组件可用:

<%

set ad = Server.CreateObjet (“MSWC.AdRotator”)

%>

 在ASP的各个组件中,ActiveX Data Object(ADO)组件有着极为重要的作用。它是一种可以提供Web页面设计开发人员快速存取Internet的数据库,并在用户端实现网上实时更新显示的Web数据库技术;ADO几乎兼容于各种数据库系统,而且跨越多种不同的程序语言开发环境。

 例如,我们在网上向本公司的客户群提供各种硬件的升级程序,与此同时,我们希望能够记录下客户的相关资料。在以前,这种Web上的交互操作一般采用CGI来完成,不仅难以书写和维护,而且对处理器的消耗很大。现在,我们使用ASP的ADO组件,就可以在短短的两个小时轻轻松松的完成以前需要三天才能完成的开发工作,而且还不必花费太多的时间和精力放在维护上。

 首先,我们需要写一个供用户填写资料的表格页面,或者我们还可以将这个页面与后面的ASP处理程序放在同一个文件里,只需要我们在<form>代码中注明Action的对象是本程序(要么就什么都不写)。

 假定我们的程序名是download.html,下面是原代码:

<html>

<body>

`声明提交方法及传递信息的方式

<form METHOD="POST" ACTION="download.asp">

<font face=arial>

<table border="0" align=center>

<tr>

<td><font color="black" size="2"><b>Name:</b></font></td>

<td><input TYPE="text" SIZE="30" NAME="name"></td>

</tr>

<tr>

<td><font color="black" size="2"><b>Telephone:</b></font></ #@62;

<td><input TYPE="text" SIZE="30" NAME="telephone"></td>

</tr>

<td><font color="black" size="2"><b>E-mail:</b></font></td>

<td><input TYPE="text" SIZE="30" NAME="email"></td>

</tr>

<tr>

<td><font color="black" size="2"><b>Address:</b></font></td>

<td><input TYPE="text" SIZE="30" NAME="address"></td>

</tr>

<tr>

</table>

<hr>

<table align=center><tr>

<td><input TYPE="Submit" VALUE="Submit"></td>

<td width=30></td>

<td><input TYPE="Reset" VALUE="Reset"></td>

</tr></table>

</font>

</form>

</body>

</html>

 然后,我们开始编写数据处理程序download.asp。

<script language=vbscript runat=server>

`设置缓冲区属性

response.buffer=true

Dim name

 判断有关字段是否为空

if Len(request.form("name"))=0 then

name="Not Entered"

else

 不为空时,利用Response对象让Server获取表格中“name”字段内容

name=request.form("name")

end if

Dim telephone

if Len(request.form("telephone"))=0 then

telephone="Not Entered"

else

telephone=request.form("telephone")

end if

Dim address

if Len(request.form("address"))=0 then

address="Not Entered"

else

address=request.form("address")

end if

  由于我们将采取Email发送的方式将该下载软件提供给用户,所以我们必须要求客户提供有效的Email地址。

Dim email

email=request.form("email")

 `判定客户填写的“Email”资料中是否含有特别字符“@”

if instr(email,"@")=0 then

`若为否,引导客户至“back.htm”的提示页面。

response.redirect("back.htm")

else

 建立数据库连接通道

Set objConn = Server.CreateObject("ADODB.Connection")

 打开