知识大全 VB6使用OracleDataControl访问Oracle

Posted 2022-07-16 属性

篇首语：人如果没有知识，无异于行尸走肉。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 VB6使用OracleDataControl访问Oracle相关的知识，希望对你有一定的参考价值。

VB6使用OracleDataControl访问Oracle 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　系统环境　　操作系统 Windows Server　　数据库　Oracle i R ( ) for NT 企业版　　开发工具 Visual Basic 中文版　　　　连接方法　　　　一安装 Oracle i R ( ) for NT 企业版　　　　使用典型安装安装目录为D:\\Oracle 　　　　注安装完Oracle后在D:\\Oracle\\Ora \\BIN\\目录下会有oradc ocx文件存在 VB可使用此控件访问Oracle数据库　　　　二安装 Visual Basic 中文版　　　　把Visual Basic 光盘放入光驱使用典型安装　　　　安装目录为D:\\Program Files\\Microsoft Visual Studio\\VB 　　　　三生成Oracle实验记录　　　　连入SQL*Plus 以system/manager用户登录　　　　SQL> conn system/manager　　　　　　创建新的用户如user /pass 赋予connect resource权限　　　　SQL> grant connect resource to user identified by pass ;　　　　　　SQL> conn user /pass 　　　　SQL> create table test(a number b char( ));　　　　SQL> insert into test values( to_char(sysdate yyyy mm dd hh :mi:ss ));　　　　SQL> insert into test values( to_char(sysdate yyyy mm dd hh :mi:ss ));　　　　SQL> insert into test values( to_char(sysdate yyyy mm dd hh :mi:ss ));　　　　SQL> insert into test values( to_char(sysdate yyyy mm dd hh :mi:ss ));　　　　SQL> insert into test values( to_char(sysdate yyyy mm dd hh :mi:ss ));　　　　SQL> mit;　　　　　　SQL> select * from test;　　　　　　 A B　　　　　　　　 : : 　　　　 : : 　　　　 : : 　　　　 : : 　　　　 : : 　　　　　　D:\\Oracle\\Ora \\neork\\ADMIN\\tnsnames ora中有如下内容　　　　　　ORADB =　　　　 (DESCRIPTION =　　　　 (ADDRESS_LIST =　　　　 (ADDRESS = (PROTOCOL = TCP)(HOST = )(PORT = ))　　　　 )　　　　 (CONNECT_DATA =　　　　 (SERVICE_NAME = oradb)　　　　 )　　　　 )　　　　　　总结　　　　Oracle service_names 　oradb　　　　Oracle用户名　　　　　user 　　　　户名密码　　　　　　　pass 　　　　测试表名　　　　　　　test　　　　tnsnames 　　　　　　　oradb　　　　四启动 Visual Basic 写连接Oracle的VB程序　　　　开始－＞程序－＞Microsoft Visual Basic 中文版－＞Microsoft Visual Basic 中文版　　　　　　文件－＞新建工程－＞VB 企业版控件如下图　　　　　 / / jpg > 　　　　添加访问Oracle的部件（CTRL+T）　　　　　　工程－＞部件－＞Oracle Data Control 如下图　　　　　 / / jpg > 　　　　　　选中此控件（Oracle Data Control）单击确定（此控件对应的就是D:\\Oracle\\Ora \\BIN\\oradc ocx）　　　　　　VB开发窗口右边的工具箱面板上会出现此控件的图形标志如下图　　　　　 / / jpg > 　　　　　　用鼠标双击此控件（ORADC）再双击MSFlexGrid控件（上图中另一个画红框的）　　　　把它们放到窗体Form 上默认名称为ORADC 和MSFlexGrid 如下图　　　　　 / / jpg > 　　　　　　　　　　　　修改控件ORADC 和MSFlexGrid 的属性如下图　　　　　　ORADC 的Connect属性 user /pass 　　　　ORADC 的DatabaseName属性 oradb　　　　ORADC 的RecordSource属性 select * from test　　　　　　MSFlexGrid 的DataSource属性 ORADC 　　　　　 / / jpg > 　　　　也可以不设置ORADC 控件的任何属性而使用窗体的Form_Load()过程来给ORADC 控件赋值　　　　　　Private Sub Form_Load()　　　　 ORADC Connect = user /pass 　　　　 ORADC DatabaseName = oradb 　　　　 ORADC RecordSource = select * from test 　　　　 ORADC Refresh　　　　End Sub　　　　　　按F 运行此程序结果如下图　　　　 / / jpg > cha138/Article/program/Oracle/201311/16753