Borland C++ Builder 5 企业版使用BDE访问 Oracle方法

类别:数据库 点击:0 评论:0 推荐:

 

        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”.

本文地址:http://com.8s8s.com/it/it21492.htm