ASP操作ORACLE数据库的实例

这里介绍一下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="te