用ASP实现对ORACLE数据库的操作
2018-09-06 13:20
ASP（ActiveServerPages）是微软公司为开发互联网应用程序所提出的工具之一，ASP与数据库的联接一般通过ADO（ActivexDataObject）来实现的，就象《计算机世界》2000年3月20日的《用ASP对SQLServer数据库操作》文章介绍的一样，ADO可以完全支持MicrosoftSQLServer,但对应用更加广泛、机制更加复杂的ORACLE数据库服务就有一些困难，如果想作一些简单的查询功能，ADO是足够的，如要想更好地发挥ORACLE数据库特有的功能，如STOREDPROCEDURE，STOREDFUNCTION等就要采取利用ASP存取ORACLE数据库服务的另一个强有力工具---OracleObjectforOLE中的ORACLE对象服务器（TheOracleObjectServer）。本文从一个实例说明如何在ASP中使用ORACLE对象服务器提供的控件来实现对ORACLE数据库的存取，并就如何维护网络数据库的完整性约束问题进行一些讨论。
----OracleObjectforOLE是ORACLE公司为了客户端存取数据库所发展的一个很需要的产品，它以Windows95/98/NT为基础供所有的与OLE兼容的应用程序与程序语言存取ORACLE数据库，如ASP、VisualBasicexcess97等，OracleObjectforOLE包含了ORACLE对象服务器（TheOracleObjectServer）、ORCLE数据控制项（TheOracleDataControl）与ORACLE对象类程序库（TheOracleObjectsforOLEC++ClassLibrary）等三项产品。
----与ADO相比，ORACLE对象服务器是专用于ORACLE数据库应用程序开发的产品，它有以下优点：
----（1）与数据库服务器的连接的运行效率好。因为ADO是通过ODBC来连接数据库服务器的，而ORACLE对象服务器是通过ORACLE的SQL*NET来连接数据库服务器的
----（2）能更好地发挥ORACLE数据库的特有功能。如STOREDPROCEDURE，STOREDFUNCTION、PACKAGE或MultipleCursor。
----本例是一个通讯录的查询、录入的小程序，用户可以通过浏览器对通讯录表进行查询，也可把自己的信息输入，供别人查询。
----通讯录表的结构如下：
NameNull?Type
-------------------------------------------
NAMENOTNULLCHAR(8)
ADDRESSCHAR(20)
PHONECHAR(20)
EMAILVARCHAR2(30)
----首先：进行环境配置：
----在WEB服务器上安装以下软件并进行配置：
----(1)基本的WEB服务器（WEBSERVER）与ASP等软件
----(2)OracleObjectforOLE2.x
----(3)SQL*NetClient或OracleNet8Client8，安装之后，用Sql*NetEasyConfiguration建立数据库别名（DatabaseAlias），为ASP连接到数据库所用的别名。
----二．功能实现
----（1）查询：用ASP取数据库通讯录表（TSB1）的数据，将数据显示在屏幕上。查询的关键在于确定与数据库的连接成功与否，ORACLE对象服务器本身有错误控制机制可以报出数据库连接方面的错误，具体的程序如下：
<HTML>
<tile>查询程序</title>
<BODY>
<%
onerrorresumenext
连接数据库
setorasession=createobject
(OracleInprocServer.XOraSession)
setoradatabase=orasession.
dbopendatabase(axp03,scott/tiger,0)
出错处理
iferr.number>0then
response.write<h4>asp错误控制</h4>
response.writeasp错误来源:&err.source&<br>
response.writeasp错误代码:&err.number&<br>
response.writeasp错误说明:&err.description&<br>
err.clear
response.write<h4>ORACLEOLE错误控制</h4>
response.writeORACLE错误代码:
response.writeORACLE错误说明:
&OraSession.LastServerErrText&<br>
else
查询
sql=select*fromtsb1
setoradynaset=oradatabase.dbcreatedynaset(sql,0)
response.write<h3>result</h3>
response.write<tableborder=5><tr>
response.write<td>
response.write</td>
next
response.write</tr>
dountiloradynaset.eof
response.write<tr>
fori=0tooradynaset.fields.count-1
response.write<td>
response.writeoradynaset.fields(i).value
response.write</td>
next
response.write</tr>
oradynaset.dbmovenext
loop
response.write</table>
关闭数据库
oradatabase.close
setorasession=nothing
endif
%>
</body>
</html>
----下面是程序的查询结果图面：
通讯录
NAMEADDRESSPHONEEMAIL
张玲马鞍山市湖北路5号nbsp;
林向马鞍山市湖南路9号
邓国虹采矿路子4幢504号nbsp;
李城青岛海洋大学7幢5070464-32456678licheng@263.net
王国在采矿小区7幢807号0555-3445454wang@mail.amgang.com.cn
丁刚红旗南路17幢405号0555-2883721dingg@mail.magang.com.cn
全在保江西路子7幢607号c.com
----（2）插入自己的信息：用ASP将用户在浏览器上提供的数据插入到数据库通讯录表（TSB1）中，由ORACLE数据库有一套完整性约束机制，所以插入过程不光是简单地把数据插入到表中，还要做完整性约束的检查，不合要求的数据拒绝插入，如果在程序中不考虑处理，运行时，就会因数据库服务器报错而中断程序。而ASP中的ERR对象可以报出错误来源、错误代码、错误说明等，并能把程序引向错误处理。
----以下是程序，一个是insert.htm,是一个输入界面，供用户输入自己的信息，一个是insert.asp,负责将用户输入信息插入数据库，并进行错误检查。
Insert.htm:
<html>
<head>
<metahttp-equiv=Content-Language
content=zh-cn>
<metahttp-equiv=Content-Type
content=text/html;charset=gb2312>
<metaname=GENERATORcontent=
MicrosoftFrontPage4.0>
<metaname=ProgIdcontent=
FrontPage.Editor.Document>
<title>请留下你的信息</title>
</head>
<body>
<palign=center>请输入你的信息</p>
<formmethod=postaction=insert.asp>
姓名：
<inputtype=textname=namesize=8><br>
地址：
<inputtype=textname=addresssize=20><br>
电话：
<inputtype=textname=phonesize=20><br>
E-MAIL：<inputtype=textname=emailsize=20><br>
<inputtype=submitvalue=确定>
<inputtype=resetvalue=取消><br>
</form>
</body>
</html>
----下面是用户输入界面：
请输入你的信息
姓名：
地址：
电话：
E-MAIL：
Insert.asp:
<HTML>
<BODY>
<%
连接数据库
setorasession=createobject
(OracleInprocServer.XOraSession)
setoradatabase=orasession.
dbopendatabase(axp03,scott/tiger,0)
把用户插入信息变成SQL语句
sql=insertintotsb1values
(&chr(39)&request(name)&chr(39)&,_
&chr(39)&request(ADDRESS)&chr(39)&,_
&chr(39)&request(phone)&chr(39)&,_
&chr(39)&request(EMAIL)&chr(39)&)
运行SQL插入语句
oradatabase.dbEXECUTESQL(sql)
检查是否有违反完整性约束错误
IFERR.NUMBER>0THEN
response.write<h4>asp错误控制</h4>
response.writeasp错误来源:&err.source&<br>
response.writeasp错误代码:&err.number&<br>
response.writeasp错误说明:&err.description&<br>
ELSE
插入完成，返回
response.write插入完成，<ahref=insert.htm>返回。。。</a>
endif
%>
</body>
</html>
----以上是本人在用ASP工具将原有的ORACLE数据库信息搬上互联网应用的一些体会，例子很简单，目的在于说明原理，本人在ASP程序中还使用了STOREDPROCEDURE，STOREDFUNCTION、PACKAGE等ORACLE特有的功能以加快速度，提高效率。希望能对大家有所启发，请来信互相交流。
上一篇：利用ASP打造网站论坛DIY
下一篇：asp无限分级(递归调用)