繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP服务器组件编程心得
- ASP
- 关于网站文件自动备份程序的一点思考
- DBTree 1.3.2
- 抽取10万条数据，想起GetRows()
- 一份ASP内存的释放的实验报告
- [整理版]ASP常用内置函数
- Jmail组件发送邮件之绝对能用的函数
- 虚拟主机重启代码
- Access 开发人员常犯错误大全
- 用Asp如何实现防止网页频繁刷新？
- ASP 中使用 HTTP 协议发送参数详解
- 为什么 Windows2003 的 IIS6.0 不能上传超过 200K 的文件？
- ASP类的写法
- 实例学习如何在ASP中调用DLL
- 被动式统计网站在线人数
- [原创]完美解决ASP 不能更新。数据库或对象为只读。
- 5天学会asp
- Wrance的图片系统目录直读版1.0
- 信息发布中的判断过期和有效期的东西
- 小偷程序2
- 一个ASP中的数组
ASP服务器组件编程心得
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 211 ::
收藏到网摘: n/a
（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></td>
<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
评论 (0) All
