VB6中用Oracle數(shù)據(jù)控件訪問Oracle

系統(tǒng)環(huán)境 ：
     1、操作系統(tǒng)：Windows 2000 Server
     2、數(shù)據(jù)庫：　Oracle 8i R2 (8.1.6) for NT 企業(yè)版
     3、開發(fā)工具：Visual Basic 6.0 中文版
    連接方法 ：
    一、安裝 Oracle 8i R2 (8.1.6) for NT 企業(yè)版
     使用典型安裝，安裝目錄為D:\Oracle；
     注：安裝完Oracle后，在D:\Oracle\Ora81\BIN\目錄下會有oradc.ocx文件存在，VB可使用此控件訪問Oracle數(shù)據(jù)庫
    二、安裝 Visual Basic 6.0 中文版
     把Visual Basic 6.0光盤放入光驅(qū)，使用典型安裝，
     安裝目錄為D:\Program Files\Microsoft Visual Studio\VB98；
    三、生成Oracle實驗記錄
     連入SQL*Plus，以system/manager用戶登錄
     SQL> conn system/manager
     創(chuàng)建新的用戶：如user1/pass1，賦予connect,resource權(quán)限。
     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中有如下內(nèi)容：
    　 ORADB =
    　 (DESCRIPTION =
    　 (ADDRESS_LIST =
    　 (ADDRESS = (PROTOCOL = TCP)(HOST = 192.1.1.1)(PORT = 1521))
    　 )
    　 (CONNECT_DATA =
    　 (SERVICE_NAME = oradb)
    　 )
    　 )
     總結(jié)：
     Oracle service_names：　oradb
     Oracle用戶名：　　　　　user1
     戶名密碼：　　　　　　　pass1
     測試表名：　　　　　　　test
     tnsnames：　　　　　　　oradb