Sorry! I don't know!
不过一句提示:如果是Access2000 建议用ADO来打开它。

解决方案 »

  1.   

    不对呀,你这是ADO不是DAO呀。
      

  2.   

    如果要打开ACCESS 2000的数据库,要用3.6。3.51不行。另外你用的是ADO的语句,不是DAO。
      

  3.   

    你这样是用ADO来打开数据库的。可以通过如下方式来打开数据库:
        Dim db As Connection
        Set db = New Connection
        db.CursorLocation = adUseClient
    //DSN方式,建议采用。
        db.Open "PROVIDER=MSDASQL;dsn=TestDatabase;uID=;pwd=;database=TestDatabase;"
    //DAO方式
      db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=D:\Program Files\Microsoft Visual Studio\VB98\Biblio.mdb;"
      

  4.   

    Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                "Data Source=\somepath\mydb.mdb;" & _
                "User Id=admin;" & _
                "Password=;"
      

  5.   

    完全可以,如下:
        Dim cn As New ADODB.Connection
        Dim rs As New ADODB.Recordset
        cn.Provider = "Microsoft.Jet.OLEDB.4.0"
        cn.Open "D:\Program Files\Microsoft Visual Studio\VB98\Biblio.mdb", "Admin"
        rs.Open "Select * from Authors ", cn