Oracle Object for OLE是ORACLE公司為了客戶端存取數(shù)據(jù)庫所發(fā)展的一個很需要的產(chǎn)品，它以Windows 95/98/NT 為基礎(chǔ)供所有的與OLE 兼容的應(yīng)用程序與程序語言存取ORACLE數(shù)據(jù)庫，如ASP、Visual Basic 等 ，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ù)器的連接的運行效率好。因為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。

本例是一個通訊錄的查詢、錄入的小程序，用戶可以通過瀏覽器對通訊錄表進(jìn)行查詢，也可把自己的信息輸入，供別人查詢。

通訊錄表的結(jié)構(gòu)如下：

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ù)庫所用的別名。

查詢：用ASP 取數(shù)據(jù)庫通訊錄表(TSB1)的數(shù)據(jù)，將數(shù)據(jù)顯示在屏幕上。查詢的關(guān)鍵在于確定與數(shù)據(jù)庫的連接成功與否，ORACLE對象服務(wù)器本身有錯誤控制機制可以報出數(shù)據(jù)庫連接方面的錯誤，具體的程序如下：

< 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  
 
%> 
 
</body> 
 
</html> 

 將上面的文件保存為.asp的格式，然后再IIS上運行，即可在瀏覽器中看到輸出結(jié)果。

【編輯推薦】

1. 誤刪Oracle數(shù)據(jù)庫實例的控制文件
2. ORACLE數(shù)據(jù)庫常見問題診斷方法
3. 淺述SQL Server的Replication技術(shù)創(chuàng)建技巧
4. Oracle獻(xiàn)媚開源數(shù)據(jù)庫 MySQL分支情緒穩(wěn)定