用evb做一数据库软件。
  我用access数据库。连接数据库时不行。
Dim connDatabase As ADOCe.Connection
Set connDatabase = CreateObject("ADOCE.Connection.3.0")
connDatabase.ConnectionString = "data source =" & App.Path & "\evb.mdb"
connDatabase.Open
   Form1.Show
提示找不到evb.mdb。
查资料有人这样写。
Set objCon = CreateObject("ADOCE.Connection.3.0") 
objCon.Open "data source = \My Documents\Jun.cdb" 
但我不知*.cdb数据库是怎样得到的。那access可以转化吗。能的话又怎样转化。
关键是让我用evb和数据库连起来该怎么做????急

解决方案 »

  1.   


    下面程序是通常连接的,(不是EVB)
    可以参考:    Dim CN   As New ADODB.Connection                '定义数据库的连接
        Dim Rs   As New ADODB.Recordset    CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
        CN.Open    Rs.CursorLocation = adUseClient
        Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic
    ------------------------------------------------
    你的这些可能有问题
    data source = \My Documents\Jun.cdbconnDatabase.ConnectionString = "data source =" & App.Path & "\evb.mdb"
      

  2.   

    to 李红根
      我看大家都用.cdb文件连接数据库。现在是.cdb文件怎么得到。
      

  3.   

    靠,把.mdb改成.cdb不就得了。:_)