网站建设| 数据库类| 图形图象| 程序设计| 现代办公| 操作系统| 考试认证| 网络技术| 软件工程| 电脑相关| 文学作品
网站开发| 网页制作| 操作系统| 图象图形| 考试认证| 数据库类| 程序设计| 硬件技术| 现代办公| 网络技术| 笑话频道
 
您的位置: 电脑书库首页-> 电脑文摘-> 程序设计-> Basic/VB类-> VB6中用Oracle数据控件访问Oracle

VB6中用Oracle数据控件访问Oracle
作者:佚名 来源:InterNet 加入时间:2005-1-28
相关文章
  • VB图像处理之图像的亮度对比度调整
  • VB实现文件数据对SQL Server上传下载
  • 用VB6.0编写磁盘格式化程序
  • VB图像处理之图像的色彩纠正
  • VB图像处理之铅笔画算法和木雕算法
  • VB图像处理之几个常用滤镜的实现
  • VB图像处理之二次线性插值的应用
  • VB图像处理之像素的获取和输出
  • VB实现图像在数据库的存储与显示
  • 利用VB6.0开发基于IIS的应用程序
  • 相关书籍:
  • VBScript语言参考
  • VBScript函数速查手册
  • VBScript5.5脚本语言参考
  • VB上机考试综合应用题选讲
  • vb另外两套教案
  • VB光盘资料库
  • VB、C快速进阶 2.0
  • Web 对象 VB参考
  • VB编程技巧集(中)--站长推荐
  • VB编程技巧集(上)--站长推荐
  • 系统环境

      1、操作系统:Windows 2000 Server

      2、数据库: Oracle 8i R2 (8.1.6) for NT 企业版

      3、开发工具:Visual Basic 6.0 中文版

      连接方法

      一、安装 Oracle 8i R2 (8.1.6) for NT 企业版

      使用典型安装,安装目录为D:\Oracle;

      注:安装完Oracle后,在D:\Oracle\Ora81\BIN\目录下会有oradc.ocx文件存在,VB可使用此控件访问Oracle数据库

      二、安装 Visual Basic 6.0 中文版

      把Visual Basic 6.0光盘放入光驱,使用典型安装,

      安装目录为D:\Program Files\Microsoft Visual Studio\VB98;

      三、生成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中有如下内容:

        ORADB =
         (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:       oradb

      四、启动 Visual Basic 6.0,写连接Oracle的VB程序

      开始->程序->Microsoft Visual Basic 6.0 中文版->Microsoft Visual Basic 6.0 中文版

      文件->新建工程->VB 企业版控件,如下图:
        

      添加访问Oracle的部件(CTRL+T):

      工程->部件->Oracle Data Control,如下图:

       
      选中此控件(Oracle Data Control),单击“确定”(此控件对应的就是D:\Oracle\Ora81\BIN\oradc.ocx)

      VB开发窗口右边的工具箱面板上会出现此控件的图形标志,如下图:


      用鼠标双击此控件(ORADC),再双击MSFlexGrid控件(上图中另一个画红框的),把它们放到窗体Form1上,默认名称为ORADC1和MSFlexGrid1,如下图:


      修改控件ORADC1和MSFlexGrid1的属性,如下图:


      ORADC1的Connect属性:user1/pass1
      ORADC1的DatabaseName属性:oradb
      ORADC1的RecordSource属性:select * from test

      MSFlexGrid1的DataSource属性:ORADC1
       
      也可以不设置ORADC1控件的任何属性,而使用窗体的Form_Load()过程来给ORADC1控件赋值

      Private Sub Form_Load()
       ORADC1.Connect = "user1/pass1"
       ORADC1.DatabaseName = "oradb"
       ORADC1.RecordSource = "select * from test"
       ORADC1.Refresh
      End Sub

      按F5,运行此程序,结果如下图:


    [文章录入员:nancy]

    相关文章
  • VB图像处理之图像的亮度对比度调整
  • VB实现文件数据对SQL Server上传下载
  • 用VB6.0编写磁盘格式化程序
  • VB图像处理之图像的色彩纠正
  • VB图像处理之铅笔画算法和木雕算法
  • VB图像处理之几个常用滤镜的实现
  • VB图像处理之二次线性插值的应用
  • VB图像处理之像素的获取和输出
  • VB实现图像在数据库的存储与显示
  • 利用VB6.0开发基于IIS的应用程序
  • 相关书籍:
  • VBScript语言参考
  • VBScript函数速查手册
  • VBScript5.5脚本语言参考
  • VB上机考试综合应用题选讲
  • vb另外两套教案
  • VB光盘资料库
  • VB、C快速进阶 2.0
  • Web 对象 VB参考
  • VB编程技巧集(中)--站长推荐
  • VB编程技巧集(上)--站长推荐
  • 本站推荐内容

    近期主机类热搜关键词:
    美国服务器 美国服务器租用 海外服务器租用 国外服务器租用

    Basic/VB类
    C/C++/VC
    C++Builder
    Basic/VB类
    Delphi/Pascal
    Java编程
    FORTRAN
    其它
    电脑教程阅读排行
    ·VB学习一点通
    ·VB设计动画时钟
    ·在Visual Basic 6....
    · 用VB6.0编写手机短信发送 ...
    ·VB实现文件数据对SQL Ser...
    ·利用Visual Basic操作...
    ·VB实现图像在数据库的存储与显示
    ·用Visual Basic6.0...
    ·Visual Basic代码优化...
    · VB中实现“无标题”窗体的移动...