这里介绍一下asp操作oracle数据库的实例。
ASP（Active Server Pages）是微软公司为开发互联网应用程序所提出的工具之一，ASP与数据库的联接一般通过ADO（Activex Data Object）来实现的，就象《计算机世界》2000年3月20日的《用ASP对SQL Server数据库操作》文章介绍的一样，ADO可以完全支持Microsoft SQL Server ,但对应用更加广泛、机制更加复杂的ORACLE 数据库服务就有一些困难，如果想作一些简单的查询功能，ADO是足够的，如要想更好地发挥ORACLE数据库特有的功能，如STORED PROCEDURE，STORED FUNCTION等就要采取利用ASP存取ORACLE 数据库服务的另一个强有力工具---Oracle Object for OLE中的ORACLE对象服务器（The Oracle Object Server）。本文从一个实例说明如何在ASP中使用ORACLE对象服务器提供的控件来实现对ORACLE数据库的存取，并就如何维护网络数据库的完整性约束问题进行一些讨论。
---- Oracle Object for OLE是ORACLE公司为了客户端存取数据库所发展的一个很需要的产品，它以Windows 95/98/NT 为基础供所有的与OLE 兼容的应用程序与程序语言存取ORACLE数据库，如ASP、Visual Basic excess97等 ，Oracle Object for OLE包含了ORACLE对象服务器（The Oracle Object Server）、ORCLE 数据控制项（The Oracle Data Control）与ORACLE 对象类程序库（The Oracle Objects for OLE C++ Class Library）等三项产品。
---- 与ADO相比，ORACLE对象服务器是专用于ORACLE数据库应用程序开发的产品，它有以下优点：
---- （1） 与数据库服务器的连接的运行效率好。因为ADO是通过ODBC来连接数据库服务器的，而ORACLE对象服务器是通过ORACLE的SQL*NET来连接数据库服务器的
---- （2） 能更好地发挥ORACLE数据库的特有功能。如STORED PROCEDURE，STORED FUNCTION、PACKAGE或Multiple Cursor。
---- 本例是一个通讯录的查询、录入的小程序，用户可以通过浏览器对通讯录表进行查询，也可把自己的信息输入，供别人查询。
---- 通讯录表的结构如下：
Name Null Type
------------------------------- -------- ----
NAME NOT NULL CHAR(8)
ADDRESS CHAR(20)
PHONE CHAR(20)
EMAIL VARCHAR2(30)
---- 首先：进行环境配置：
---- 在WEB服务器上安装以下软件并进行配置：
---- (1)基本的WEB 服务器（WEB SERVER）与ASP等软件
---- (2)Oracle Object for OLE2.x
---- (3)SQL*Net Client 或 Oracle Net8 Client 8，安装之后，用Sql*Net Easy Configuration建立数据库别名（Database Alias），为ASP连接到数据库所用的别名。
---- 二．功能实现
---- （1）查询：用ASP 取数据库通讯录表（TSB1）的数据，将数据显示在屏幕上。查询的关键在于确定与数据库的连接成功与否，ORACLE对象服务器本身有错误控制机制可以报出数据库连接方面的错误，具体的程序如下：
<HTML>
<title> 查询程序 </title>
<BODY>
<%
on error resume next
'连接数据库
set orasession=createobject
("OracleInprocServer.XOraSession")
set oradatabase=orasession.
dbopendatabase("axp03","scott/tiger",0)
'出错处理
if err.number>0 then
response.write"<h4>asp 错误控制 </h4>"
response.write"asp 错误来源:"&err.source &"<br>"
response.write"asp 错误代码:"&err.number&"<br>"
response.write"asp 错误说明:"&err.description&"<br>"
err.clear
response.write"<h4>ORACLE OLE 错误控制</h4>"
response.write"ORACLE 错误代码:
"&OraSession.LastServerErr&"<br>"
response.write"ORACLE 错误说明:
"&OraSession.LastServerErrText&"<br>"
else
'查询
sql="select * from tsb1"
set oradynaset=oradatabase.dbcreatedynaset(sql,0)
response.write"<h3>result</h3>"
response.write"<table border=5><tr>"
for i=0 to oradynaset.fields.count-1
response.write"<td>"
response.write oradynaset.fields(i).name & " "
response.write"</td>"
next
response.write"</tr>"
do until oradynaset.eof
response.write"<tr>"
for i=0 to oradynaset.fields.count-1
response.write"<td>"
response.write oradynaset.fields(i).value
response.write"</td>"
next
response.write"</tr>"
oradynaset.dbmovenext
loop
response.write"</table>"
'关闭数据库
oradatabase.close
set orasession=nothing
end if
%>
</body>
</html>
(鼠标移到代码上去，在代码的顶部会出现四个图标，第一个是查看源代码，第二个是复制代码，第三个是打印代码，第四个是帮助)
---- 下面是程序的查询结果图面：
通讯录
NAME ADDRESS PHONE EMAIL
张玲 马鞍山市湖北路*号 0555-******* ******@mial.magang.com.cn
林向 马鞍山市湖南路*号 0555-******* ******@mail.magang.com.cn
---- （2）插入自己的信息：用ASP将用户在浏览器上提供的数据插入到数据库通讯录表（TSB1）中，由ORACLE数据库有一套完整性约束机制，所以插入过程不光是简单地把数据插入到表中，还要做完整性约束的检查，不合要求的数据拒绝插入，如果在程序中不考虑处理，运行时，就会因数据库服务器报错而中断程序。而ASP中的ERR对象可以报出错误来源、错误代码、错误说明等，并能把程序引向错误处理。
---- 以下是程序，一个是insert.htm, 是一个输入界面，供用户输入自己的信息，一个是insert.asp,负责将用户输入信息插入数据库，并进行错误检查。
Insert.htm
<html> <head> <meta http-equiv="Content-Language" content="zh-cn"> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta name="GENERATOR" content= "Microsoft FrontPage 4.0"> <meta name="ProgId" content= "FrontPage.Editor.Document"> <title>请留下你的信息</title> </head> <body> <p align="center">请输入你的信息</p> <form method="post" action="insert.asp"> 姓 名： <input type="text" name="name" size="8"> <br> 地 址： <input type="text" name="address" size="20"> <br> 电 话： <input type="text" name="phone" size="20"> <br> E-MAIL：<input type="text" name="email" size="20"> <br> <input type="submit" value="确定"> <input type="reset" value="取消"><br> </form> </body> </html>(鼠标移到代码上去，在代码的顶部会出现四个图标，第一个是查看源代码，第二个是复制代码，第三个是打印代码，第四个是帮助)
---- 下面是用户输入界面：
请输入你的信息
姓 名：
地 址：
电 话：
E-MAIL：
Insert.asp:
<HTML>
<BODY>
<%
'连接数据库
set orasession=createobject
("OracleInprocServer.XOraSession")
set oradatabase=orasession.
dbopendatabase("axp03","scott/tiger",0)
'把用户插入信息变成SQL语句
sql="insert into tsb1 values
(" &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)
'检查是否有违反完整性约束错误
IF ERR.NUMBER>0 THEN
response.write"<h4>asp 错误控制 </h4>"
response.write"asp 错误来源:"&err.source &"<br>"
response.write"asp 错误代码:"&err.number&"<br>"
response.write"asp 错误说明:"&err.description&"<br>"
ELSE
'插入完成，返回
response.write"插入完成，<a href=insert.htm> 返回。。。</a>"
end if
%>
</body>
</html>
(鼠标移到代码上去，在代码的顶部会出现四个图标，第一个是查看源代码，第二个是复制代码，第三个是打印代码，第四个是帮助)---- 以上是一个asp操作oracle数据库的例子，很简单，目的在于说明原理，本人在ASP程序中还使用了 STORED PROCEDURE，STORED FUNCTION、PACKAGE 等ORACLE特有的功能以加快速度，提高效率。希望能对大家有所启发，请来信互相交流。