BorlandC++使用BDE訪問Oracle方法
2024-08-29 13:41:50
供稿：網友
系統環境：
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”.
