这个我全是STRING的
主要是在Set RS1 = DB1.OpenRecordset("t_sttk", dbOpenTable)
就出现问题了,说是dbopentable类型不匹配

解决方案 »

  1.   

    这段代码在我的电脑上能通过.
    我引用的dao3.5,acess97
    Dim db As Database, rs As Recordset
       Set db = DBEngine.OpenDatabase("database\db2.mdb")
       Set rst1 = db.OpenRecordset("表1", dbOpenTable)
      

  2.   

    ?dbOpenTable=1你用的是Vb6.0還是vb5.0?
      

  3.   

    你直接
    Set Rst = db.OpenRecordset("select * from tab")
    不行吗
      

  4.   

    如上所说Set Rst = db.OpenRecordset("select * from tab")
    不行吗或 set rst=db.openRecordset("t_sttk")    ;不用第二个参数试试(一般没什么影响的)