繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP实用大全-ASP服务器组件(7)
- ASP
- 货币大写转换函数的更新
- 断开的数据库连接的一个例子
- 本函数计算两个时间的差
- 一个防止外部数据提交的脚本
- 一个取图片尺寸的类，支持jpg,gif,png
- 我在桌面上删帖子
- IIS5.0中EXECUTE的巧用
- 一个简单的SQL语句执行器
- ip限制函数
- 对一篇很长的文章做到完美的分页输出
- ADO连接数据库字符串大全（VP,Excel,文本,Sybase,.NET等)
- 不用询问关闭一个独立的窗口代码
- 如何正确显示数据库中的图片
- 精彩OUTLOOK 2000组件放送
- 基于WEB系统的多语言支持--ASP国际化多语言详细方案
- 将你的网站设置为客户的信任站点--WSH方案
- 优化Web数据库页面
- 浅谈 ASP 程序的编程与优化
- 认识和优化 connection 对象
- 多个域名绑定一个空间互不影响
ASP实用大全-ASP服务器组件(7)
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 22 ::
收藏到网摘: 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")
打开
评论 (0) All
