Delphi下ADO+ODAC操作異構(gòu)數(shù)據(jù)庫的方法

王琪

［摘要］ 本文主要介紹Delphi下ADO+ODAC操作異構(gòu)數(shù)據(jù)庫的方法，使用ODAC、ADO、TextFile以及包括Excel在內(nèi)的4種數(shù)據(jù)庫平臺，完成了一次跨數(shù)據(jù)庫平臺的數(shù)據(jù)組織工作。

［關(guān)鍵詞］ Delphi； ODAC； ADO； TextFile； Excel

doi : 10 . 3969 / j . issn . 1673 - 0194 . 2012 . 05. 028

［中圖分類號］TP393［文獻標識碼］A［文章編號］1673 - 0194（2012）05- 0053- 02

１前言

“經(jīng)濟效益評價”軟件是利用油田效益評價分析系統(tǒng)，進行單井效益評價。該軟件需要按月導(dǎo)入單井開發(fā)數(shù)據(jù)，經(jīng)過費用分攤后得出每口井開發(fā)效果。導(dǎo)入的數(shù)據(jù)來源有兩個：一是來自于單井的井史數(shù)據(jù)，二是來自于軟件本身ＳＱＬ Ｓerver服務(wù)器的基本參數(shù)。本文主要介紹在Ｄｅｌｐｈｉ環(huán)境下，分別讀取Ｏｒａｃｌｅ 和 ＳＱＬ Ｓerver數(shù)據(jù)，并最終生成Ｅｘｃｅｌ格式的數(shù)據(jù)，供評價軟件使用。

２井史數(shù)據(jù)下載

井史數(shù)據(jù)保存在ＰＤＰＭＩＳ的Ｏｒａｃｌｅ數(shù)據(jù)庫中，目前已經(jīng)單軌運行的Ａ２系統(tǒng)也提供了相應(yīng)的視圖。所以我們需要讀取這些基于Ｏｒａｃｌｅ的數(shù)據(jù)。

軟件采用Ｄｅｌｐｈｉ開發(fā)，自然地，我們使用ＯＤＡＣ組件。Ｏｒａｃｌｅ 數(shù)據(jù)存取組件（ＯＤＡＣ） 庫為Ｂｏｒｌａｎｄ Ｄｅｌｐｈｉ，Ｃ＋＋ Ｂｕｉｌｄｅｒ 以及 Ｋｙｌｉｘ提供了一些非可視化的組件。它們用來存取Ｏｒａｃｌｅ關(guān)系數(shù)據(jù)庫系統(tǒng)。與ＢＤＥ類似， ＯＤＡＣ 也是一種可供選擇的處理數(shù)據(jù)的方法。ＯＤＡＣ 直接使用 Ｏｒａｃｌｅ 調(diào)用接口（ＯＣＩ）。 ＯＣＩ 是一種允許應(yīng)用程序開發(fā)人員使用第三方開發(fā)語言存取Ｏｒａｃｌｅ數(shù)據(jù)服務(wù)器的過程或函數(shù)以及控制所有的ＳＱＬ語句執(zhí)行狀態(tài)的應(yīng)用程序接口（ＡＰＩ）。ＯＣＩ 通過一個動態(tài)運行庫（ＯＲＡ*．ＤＬＬ）提供了一個標準的數(shù)據(jù)庫存取庫及函數(shù)，以在應(yīng)用程序中建立連接。也可以使用ＯＤＡＣ的Ｎｅｔ選項而無需在客戶機上安裝Ｏｒａｃｌｅ客戶端來連接到Ｏｒａｃｌｅ。在這種情況下，ＯＤＡＣ僅需要ＴＣＰ／ＩＰ協(xié)議的支持，從而可以創(chuàng)建真正的、最小的數(shù)據(jù)庫應(yīng)用程序。

使用ＯＤＡＣ有以下優(yōu)勢：

（1） 選擇Ｎｅｔ選項使客戶機上不再需要安裝 Ｏｒａｃｌｅ 客戶端。

（2） 不需要分發(fā)、安裝及配置 ＢＤＥ 及 ＯＤＢＣ。

（3） 允許用戶使用許多 Ｏｒａｃｌｅ 的特殊功能。

（4） 提供自動鎖定及刷新記錄機制。

（5） 允許通過使用多線程來執(zhí)行長時間的存儲過程。

（6） ＯＤＡＣ 組件的界面（方法，屬性）和標準的ＢＤＥ數(shù)據(jù)存取組件（ＴＤａｔａｂａｓｅ，ＴＱｕｅｒｙ，…）非常相似。

由于下載的數(shù)據(jù)不完整（沒有包括井的靜態(tài)參數(shù)），所以需要將數(shù)據(jù)暫存起來，這里采用Ａｃｃｅｓｓ數(shù)據(jù)庫作為中間文件（因為這是微軟各版本的Wｉｎｄｏｗｓ都默認提供的）。另外，這個暫存文件還起到了數(shù)據(jù)備份的作用，如果只需要重新導(dǎo)出Ｅｘｃｅｌ文件時，不用再次下載了。

利用ＡＤＯ訪問Ａｃｃｅｓｓ是最直接的。ＡＤＯ是一套ＣＯＭ（Ｃｏｍｐｏｎｅｎｔ Ｏｂｊｅｃｔ Ｍｏｄｅｌ，組件對象模型）組件（ＤＬＬｓ），它允許用戶像訪問電子郵件和文件系統(tǒng)一樣訪問數(shù)據(jù)庫。使用ＡＤＯ編寫的應(yīng)用程序不需要ＢＤＥ。ＡＤＯ編程模型圍繞著幾個ＡＤＯ對象而建立，這些對象為訪問各種數(shù)據(jù)源提供多種方法。這些對象提供連接數(shù)據(jù)源、查詢與更新記錄集、報告錯誤的功能。Ｄｅｌｐｈｉ通過幾個ＶＣＬ組件通過訪問這些對象的封裝組件。

在程序中添加一個ＴＯｒａＳｅｓｓｉｏｎ 和 一個 ＴＯｒａＱｕｅｒｙ，以及一個ＴＡＤＯＣｏｍｍａｎｄ組件。

程序逐行讀取Ｏｒａｃｌｅ數(shù)據(jù)，經(jīng)過一定的轉(zhuǎn)換，生成一條Ｉｎｓｅｒｔ語句，插入到Ａｃｃｅｓｓ。

３單井靜態(tài)數(shù)據(jù)下載

這些數(shù)據(jù)是由采油礦人員每月手工導(dǎo)入的，但相鄰兩個月之間數(shù)變化不大，所以為了減少不必要的中間環(huán)節(jié)，不妨從ＳＱＬ Ｓerver數(shù)據(jù)庫中下載下來，一起放到Ｅｘｃｅｌ中，只需要單獨修改個別發(fā)生變化的井即可。

這項工作需要一個ＴＡＤＯＱｕｅｒｙ來連接到ＳＱＬ Ｓerver，仍然用前面的ＴＡＤＯＣｏｍｍａｎｄ 來執(zhí)行更新。同樣，先讀取一行ＳＱＬ Ｓerver數(shù)據(jù)，生成一條Ｕｐｄａｔｅ語句，來更新Ａｃｃｅｓｓ。

４輸出Ｅｘｃｅｌ

評價軟件對Ｅｘｃｅｌ文件要求不高，只需要逗號分隔即可，其實就是*．ＣＳＶ，但擴展名必須是“．ｘｌｓ”。所以代碼比較簡單。

５軟件附加功能介紹

（1） 軟件能夠在啟動時檢查 “ｊｊ．ｍｄｂ”（Ａｃｃｅｓｓ數(shù)據(jù)庫）文件是否存在，否則自動建立文件和相應(yīng)的數(shù)據(jù)表。

（2） 為了能夠?qū)尉撵o態(tài)信息更新可以根據(jù)用戶的需要進行修改，我們創(chuàng)建列表。

６結(jié)論與認識

本文介紹了整個軟件的實現(xiàn)過程，在Dｅｌｐｈｉ這個統(tǒng)一的ＩＤＥ下，分別使用了ＯＤＡＣ、ＡＤＯ、ＴｅｘｔＦｉｌｅ等多種方式，使用了包括Ｅｘｃｅｌ在內(nèi)的４種數(shù)據(jù)庫平臺，完成了一次跨數(shù)據(jù)庫平臺的數(shù)據(jù)組織工作，作為效益評價軟件的輔助工具，在實際應(yīng)用中起到了一定的作用。同時也看到目前軟件開發(fā)中存在的問題：

目前的軟件開發(fā)都會根據(jù)各自的需求選用相應(yīng)的數(shù)據(jù)庫平臺，這就造成了軟件間數(shù)據(jù)的共享瓶頸，所以在今后的軟件開發(fā)中一定要在兼顧數(shù)據(jù)來源的前提下，理性地選擇數(shù)據(jù)庫平臺，以提高軟件實用性、兼容性，減少不必要的中間環(huán)節(jié)。

主要參考文獻

［１］ 梁水，李方超，賽奎春. Ｄｅｌｐｈｉ開發(fā)技術(shù)大全［M］. 北京：人民郵電出版社，２００７．