set cn=New ADODB.Connection
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;DATABASE=G:\Program Files\Microsoft Visual Studio\VB98\NWIND.mdb"
   set rs =new adodb.recordset  
   rs.Open "select * from 表名", cn,……

解决方案 »

  1.   

    怎么在工程上引用ADO?着急~~~~~~~~
      

  2.   

    工程(P)-->引用-->
           选择:Microsoft ActiveX Data Objects 2.X library
      

  3.   

    可以结合ODBC应用,这样可以使用加密的ACCESS数据库!
      

  4.   

    工程(P)-->引用-->
           选择:Microsoft ActiveX Data Objects 2.X library
    我这样设置以后仍然是报这个错没用啊!召唤达人~~~~
      

  5.   

    RE  jeckwa(Vivian什么叫先引用,再定义
      

  6.   

    Progect-->components-->
           选择:Microsoft ADO Data Control 6.0
    然后定义,即你上面的语句
    Dim cn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    set...
      

  7.   

    Dim cn As New ADODB.Connection怎么连这句都过不了
    报未定义类型错怎么办?
    我觉得一定是VB环境里少设置了什么
    但是不知道在哪里设置!