扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
系统环境:
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”.
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。
现场直击|2021世界人工智能大会
直击5G创新地带,就在2021MWC上海
5G已至 转型当时——服务提供商如何把握转型的绝佳时机
寻找自己的Flag
华为开发者大会2020(Cloud)- 科技行者