Dim adoConnectionX As New ADODB.Connection
adoConnectionX.Open "Provider=MSDAORA.1;User ID=demo;Password=demo;server=beq-local;Persist Security Info=False"
Dim adoRecordsetX As New ADODB.Recordset
adoRecordsetX.Open "select rownum as 序号,employee.*  from employee", adoConnectionX, adOpenKeyset, adLockOptimistic

解决方案 »

  1.   

    1.安裝Microsoft ODBC for Oracle.
    2.建立ODBC
    3.用ADO訪問Database(建議)
      

  2.   

    建立ODBC连接,将连接串拷下来,到VB中用该串打开数据库
      

  3.   

    建议不要使用 ODBC !
    应用 Oracle OLE DB 的专用接口:
    OraOLEDB.Oracle.1 (Oracle 提供下载: http://download.oracle.com/otn/other/ole-oo4o/OraOLEDB_81710.exe)
    MSDAORA.1 (Microsoft MDAC 2.X(ADO) 提供下载: http://download.microsoft.com/download/dasdk/install/2.60.6526.3/WIN98Me/CN/mdac_typ.exe)
      

  4.   

    怎么样直接用SQL语言访问ORACLE呢?