ASP如何实现对ORACLE数据库的操作

发布时间：2024-01-02 07:19:38 所属栏目：Asp教程来源：DaWei

导读： Oracle Object for OLE是ORACLE公司为了客户端存取数据库所发展的一个很需要的产品，它以Windows 95/98/NT 为基础供所有的与OLE 兼容的应用程序与程序语言存取ORACLE数据库，如ASP、Visual

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连接到数据库所用的别名。

功能实现

查询：用ASP 取数据库通讯录表（TSB1）的数据，将数据显示在屏幕上。查询的关键在于确定与数据库的连接成功与否，ORACLE对象服务器本身有错误控制机制可以报出数据库连接方面的错误，具体的程序如下：

以下为引用的内容：
　　< HTML > < tile >　查询程序 < /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 >

（编辑：常州站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!