如何用ASP實現(xiàn)對ORACLE數(shù)據(jù)庫的操作_ASP教程

2024-05-04 11:04:13

字體：大中小

供稿：網(wǎng)友

推薦：淺析ASP中的Debug類--VBScript
不知道用ASP寫代碼的朋友是不是和我有一樣的感受，ASP中最頭疼的就是調(diào)試程序的時候不方便，我想可能很多朋友都會用這樣的方法“response.write ”，然后輸出相關(guān)的語句來看看是

ASP（Active Server Pages）是微軟公司為開發(fā)互聯(lián)網(wǎng)應(yīng)用程序所提出的工具之一，ASP與數(shù)據(jù)庫的聯(lián)接一般通過ADO（Activex Data Object）來實現(xiàn)的，就象《計算機(jī)世界》2000年3月20日的《用ASP對SQL Server數(shù)據(jù)庫操作》文章介紹的一樣，ADO可以完全支持Microsoft SQL Server ，但對應(yīng)用更加廣泛、機(jī)制更加復(fù)雜的ORACLE 數(shù)據(jù)庫服務(wù)就有一些困難，如果想作一些簡單的查詢功能，ADO是足夠的，如要想更好地發(fā)揮ORACLE數(shù)據(jù)庫特有的功能，如STORED PROCEDURE，STORED FUNCTION等就要采取利用ASP存取ORACLE 數(shù)據(jù)庫服務(wù)的另一個強(qiáng)有力工具——Oracle Object for OLE中的ORACLE對象服務(wù)器（The Oracle Object Server）。本文從一個實例說明如何在ASP中使用ORACLE對象服務(wù)器提供的控件來實現(xiàn)對ORACLE數(shù)據(jù)庫的存取，并就如何維護(hù)網(wǎng)絡(luò)數(shù)據(jù)庫的完整性約束問題進(jìn)行一些討論。

Oracle Object for OLE是ORACLE公司為了客戶端存取數(shù)據(jù)庫所發(fā)展的一個很需要的產(chǎn)品，它以Windows 95/98/NT 為基礎(chǔ)供所有的與OLE 兼容的應(yīng)用程序與程序語言存取ORACLE數(shù)據(jù)庫，如ASP、Visual Basic excess97等，Oracle Object for OLE包含了ORACLE對象服務(wù)器（The Oracle Object Server）、ORCLE 數(shù)據(jù)控制項（The Oracle Data Control）與ORACLE 對象類程序庫（The Oracle Objects for OLE C Class Library）等三項產(chǎn)品。

與ADO相比，ORACLE對象服務(wù)器是專用于ORACLE數(shù)據(jù)庫應(yīng)用程序開發(fā)的產(chǎn)品，它有以下優(yōu)點：

（1）與數(shù)據(jù)庫服務(wù)器的連接的運(yùn)行效率好。因為ADO是通過ODBC來連接數(shù)據(jù)庫服務(wù)器的，而ORACLE對象服務(wù)器是通過ORACLE的SQL*NET來連接數(shù)據(jù)庫服務(wù)器的

（2）能更好地發(fā)揮ORACLE數(shù)據(jù)庫的特有功能。如STORED PROCEDURE，STORED FUNCTION、PACKAGE或Multiple Cursor。通訊錄表的結(jié)構(gòu)如下：

以下為引用的內(nèi)容：

　　Name　　　　　　　　　　　　　　Null？　　Type

------------------------------- -------- ----

　　NAME　　　　　　　　　　　　　　NOT NULL CHAR（8）

　　ADDRESS　　　　　　　　　　　　　　　　　CHAR（20）

　　PHONE　　　　　　　　　　　　　　　　　　CHAR（20）

　　EMAIL　　　　　　　　　　　　　　　　　　VARCHAR2（30）

首先：進(jìn)行環(huán)境配置：
在WEB服務(wù)器上安裝以下軟件并進(jìn)行配置：
(1)基本的WEB 服務(wù)器（WEB SERVER）與ASP等軟件
(2)Oracle Object for OLE2.x
(3)SQL*Net Client 或 Oracle Net8 Client 8，安裝之后，用Sql*Net Easy Configuration建立數(shù)據(jù)庫別名（Database Alias），為ASP連接到數(shù)據(jù)庫所用的別名。
二．功能實現(xiàn)
（1）查詢：用ASP 取數(shù)據(jù)庫通訊錄表（TSB1）的數(shù)據(jù)，將數(shù)據(jù)顯示在屏幕上。查詢的關(guān)鍵在于確定與數(shù)據(jù)庫的連接成功與否，ORACLE對象服務(wù)器本身有錯誤控制機(jī)制可以報出數(shù)據(jù)庫連接方面的錯誤，具體的程序如下：

以下為引用的內(nèi)容：

　　< HTML > < tile >　查詢程序 < /title >

　　< BODY >

　　< %

　　on error resume next

　　連接數(shù)據(jù)庫

　　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 >"

關(guān)閉數(shù)據(jù)庫

以下為引用的內(nèi)容：

oradatabase.close set orasession=nothing end if % >

< /body > < /html >

下面是程序的查詢結(jié)果圖面：

分享：解讀ASP網(wǎng)站Server object error的方法
癥狀：訪問asp網(wǎng)頁的時候出現(xiàn)如下錯誤:Server object error ''ASP 0178 : 80070005''Server.CreateObject Access Error/_fpclass/fpdbrgn1.inc, line 99The call to Server.C