求助高手!!!我用vb6+data控件连access数据库,打包后找不到连接数据库阿,如何解决!!万分感谢

解决方案 »

  1.   

    放棄這個控件,用ADODB來做。
      

  2.   

    要在 vb 中的 工程->引用-> 加入 Microsoft Activex Data Objects 2.1 Library
    数据查询
    如下Dim conn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    Dim sql As Stringsql = "select * from tablename"
    conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="=" + App.Path + "\dbname.mdb;Persist Security Info=False"
    conn.Open
    rs.Open sql, conn, adOpenKeyset, adLockOptimistic