Borland C++ Builder 5 企業版使用BDE訪問 Oracle方法

c++|oracle|訪問
 

        Borland C++ Builder 5 企業版使用BDE訪問 Oracle方法

系統內容：
1、作業系統：Windows 2000 Server
2、資料庫：　Oracle 8i R2 (8.1.6) for NT 企業版
3、開發工具：Borland C++ Builder 5 企業版

串連方法：

一、安裝 Oracle 8i R2 (8.1.6) for NT 企業版
　　　　使用典型安裝，安裝目錄為D:\Oracle；

二、安裝 Borland C++ Builder 5 企業版
　　　　把 Borland C++ Builder 5 光碟片放入光碟機，使用典型安裝，
　　　　安裝目錄為C:\Program Files\Borland\CBuilder5；

三、產生Oracle實驗記錄
　　　　連入SQL*Plus，以system/manager使用者登入
　　　　SQL> conn system/manager

　　　　建立新的使用者：如user1/pass1，賦予connect,resource許可權。
　　　　SQL> grant connect,resource to user1 identified by pass1;

　　　　SQL> conn user1/pass1
　　　　SQL> create table test(a number,b char(19));
　　　　SQL> insert into test values(1,to_char(sysdate,'yyyy-mm-dd hh24:mi:ss'));
　　　　SQL> insert into test values(2,to_char(sysdate,'yyyy-mm-dd hh24:mi:ss'));
　　　　SQL> insert into test values(3,to_char(sysdate,'yyyy-mm-dd hh24:mi:ss'));
　　　　SQL> insert into test values(4,to_char(sysdate,'yyyy-mm-dd hh24:mi:ss'));
　　　　SQL> insert into test values(5,to_char(sysdate,'yyyy-mm-dd hh24:mi:ss'));
　　　　SQL> commit;

　　　　SQL> select * from test;

　　　　         A B
　　　　---------- -------------------
　　　　         1 2000-11-28 20:27:33
　　　　         2 2000-11-28 20:27:36
　　　　         3 2000-11-28 20:27:38
　　　　         4 2000-11-28 20:27:40
　　　　         5 2000-11-28 20:27:52

　　　　D:\Oracle\Ora81\network\ADMIN\tnsnames.ora中有如下內容：

　　　　test =
　　　　  (DESCRIPTION =
　　　　    (ADDRESS_LIST =
　　　　      (ADDRESS = (PROTOCOL = TCP)(HOST = 192.1.1.1)(PORT = 1521))
　　　　    )
　　　　    (CONNECT_DATA =
　　　　      (SERVICE_NAME = oradb)
　　　　    )
　　　　  )

　　　　總結：
　　　　Oracle service_names：　oradb
　　　　Oracle使用者名稱：　　　　　user1
　　　　戶名密碼：　　　　　　　pass1
　　　　測試表名：　　　　　　　test
　　　　tnsnames：　　　　　　　test

四、配置BDE
　　　　開始－＞程式－＞Borland C++Builder 5－＞BDE Administrator
　　　　1、配置Drivers，修改以下幾個地方.

　　　　DLL32：　　　　　　SQLORA8.DLL
　　　　VENDOR INIT：　　　OCI.DLL
　　　　LANGDRIVER：　　　 Oracle SQL WE850
　　　　SQLPASSTHRU MODE： SHARED NOAUTOCOMMIT

　　　　清除SERVER NAME和USER NAME

　　　　修改完，按滑鼠右鍵，apply（CTRL+A），提交修改

　　　　

　　　　2、配置Database Aliases（資料庫訪問別名），建立一個別名，起名為oracle.

　　　　
　　　　

　　　　3、修改以下幾個地方.

　　　　SERVER NAME：　　　test

　　　　

　　　　修改完，按滑鼠右鍵，apply（CTRL+A），提交修改，退出BDE Administrator

　　　　重新開啟BDE Administrator，用滑鼠左鍵雙擊別名oracle，進行串連測試

　　　　

　　　　輸入使用者名稱、密碼，按“OK”串連，不能把user1/pass1直接寫在User Name上，要分開寫

　　　　

五、啟動 Borland C++ Builder 5 企業版，寫串連 Oracle 的 C++ Builder 程式
　　　　開始－＞程式－＞Borland C++Builder 5－＞C++Builder 5

　　　　File－＞New...－＞Application.

　　　　C++ Builder 開發視窗上方的工具箱面板：

　　　　

　　　　開啟Data Access控制群組，用滑鼠雙擊控制項Table，再雙擊DataSource控制項,把它們放到表單Form1上，預設名稱為Table1和DataSource1：

　　　　

　　　　開啟Data Controls控制群組，用滑鼠雙擊DBGrid控制項（上圖中畫紅框的），
　　　　把它放到表單Form1上，預設名稱為DBGrid1，

　　　　

　　　　修改控制項Table1、DataSource1、DBGrid1的屬性，Table1的Active屬性：True
　　　　Table1的DatabaseName屬性：oracle（即是選BDE名）
　　　　Table1的TableName屬性：TEST（這裡需要串連oracle）

　　　　DataSource1的DataSet屬性：Table1

　　　　DBGrid的DataSource屬性：DataSource1

　　　　   

　　　　按F9，運行此程式，彈出登入畫面，

　　　　

　　　　輸入使用者名稱、密碼，按“OK”.