如题,谢谢!

解决方案 »

  1.   

    最简单的方法是: 用 adodc 控件
      

  2.   

    在连接之前看是否要将Access数据库转换成早期的版本!
      

  3.   

    dim cn as adodb.connectionstring
      dim str as string
      dim db as string
      db="..."  
      str="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &db
      cn.open str
      

  4.   

    一 : ado控件法
    二: 代码法
         dim cn as new adodb.connection
      dim cmd as new adodb.command
    dim rst as new adodb.recordset
    cn.connectionstrin="provider=mic……“
    cn.open
    set cm.activeconnection=cn
    cmd.commandtext="select *form tablename"
    rst.cursorlocation=aduseclient
    rst.open cmd………………
      

  5.   

    dim conn as new adodb.connection
        str = "data.mdb"
        conn.ConnectionString = "driver={Microsoft access driver (*.mdb)};" & "dbq=" & str
        conn.Open
      

  6.   

    dim cn as adodb.connection
    set cn=new adodb.connection
    cn.open"Provider=microsoft jet 4.0 oledb ;Persist Security Info=False;User ID=sa;Initial Catalog=rds;Data Source=ftp
    "
    就OK了