首 页文章中心下载中心繁體中文
设为首页
加入收藏
联系我们
您当前的位置:开源盛世-源代码下载网 -> 文章中心 -> 其他编程 -> Delphi技术 -> 文章内容 退出登录 用户管理
栏目导航
· VC# 技术 · Delphi技术
· Java技术 · 通用算法
· 编程相关
热门文章
· Tab Control控件使用...
· 学生档案管理系统
· [图文] 排列组合公式
· UTF-8与GB2312之间的...
· DirectShow下载安装...
· Virtual PC 在PAE模...
· Windows2000终端服务...
· MapInfo上的GIS系统...
· kalman filter 卡尔...
· Windows2000终端服务...
相关文章
· 用Mapx在Delphi中放...
· 再谈VC++ vs Delphi...
· 再谈VC++ vs Delphi...
· 对delphi的质疑,一...
· Delphi的压缩流与解...
· Delphi6 运行界面与...
· Delphi 6 IDE的运行...
· 关于Delphi中预编译...
· 一组 Delphi5.0 快捷...
· Delphi 6 的新功能
Delphi5 企业版使用BDE访问 Oracle方法
作者:佚名  来源:vscodes.com整理  发布时间:2005-12-16 13:30:03  发布人:Polaris

减小字体 增大字体

  • 系统环境:
      1、操作系统:Windows 2000 Server
      2、数据库: Oracle 8i R2 (8.1.6) for NT 企业版
      3、开发工具:Delphi 5 企业版
  • 连接方法:
      一、安装 Oracle 8i R2 (8.1.6) for NT 企业版    使用典型安装,安装目录为D:Oracle;二、安装 Delphi 5 企业版    把Delphi 5光盘放入光驱,使用典型安装,    安装目录为C:Program FilesBorlandDelphi5;三、生成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:OracleOra81 etworkADMIN nsnames.ora中有如下内容:    test =     (DEs criptION =     (ADDRESS_LIST =     (ADDRESS = (PROTOCOL = TCP)(HOST = hlshang)(PORT = 1521))     )     (CONNECT_DATA =     (SERVICE_NAME = oradb)     )     )    总结:    Oracle service_names: oradb    Oracle用户名:     user1    户名密码:       pass1    测试表名:       test    tnsnames:       test四、配置BDE    开始->程序->Borland Delphi 5->BDE Administrator    1、配置Drivers,修改以下几个地方,如下图:    DLL32:      SQLORA8.DLL    VENDOR INIT:   OCI.DLL    LANGDRIVER:    Oracle SQL WE850    SQLPASSTHRU MODE: SHARED NOAUTOCOMMIT    修改完,按鼠标右键,apply(CTRL+A),提交修改        2、配置Database Aliases(数据库访问别名),新建一个别名,起名为oracle,如下图:            3、修改以下几个地方,如下图:    SERVER NAME:   test        修改完,按鼠标右键,apply(CTRL+A),提交修改,退出BDE Administrator    重新打开BDE Administrator,用鼠标左键双击别名oracle,进行连接测试        输入用户名、密码,按“OK”连接,不能把user1/pass1直接写在User Name上,要分开写    如果出现下图,则说明连接成功    五、启动 Delphi 5 企业版,写连接 Oracle 的 Delphi 程序    开始->程序->Borland Delphi 5->Delphi 5    File->New...->Application,如下图:        Delphi 开发窗口上方的工具箱面板:        打开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”,运行结果如下图:    

End of《Delphi5 企业版使用BDE访问 Oracle方法》

[] [返回上一页] [打 印] [收 藏]
上一篇文章:日历函数单元
 
∷相关“Delphi5 企业版使用BDE访问 Oracle方法”文章评论∷
(评论内容只代表网友观点,与本站立场无关!) [更多评论...]
关于本站 - 网站帮助 - 广告合作 - 下载声明 - 友情连接 - 网站地图 网站目录 鄂ICP备06007162
开源盛世 版权所有Copyright © 2003-2005 VSCodes.Com. All Rights Reserved.