在连接ACCESS的时候总是会出现
run-time error '429' 
activex component can't create object
 
而另外的几台机器相同的机器就没有事情,怎么回事情呢

解决方案 »

  1.   

    应该是缺少 ado 库,安装一个就可以了。
      

  2.   

    代码如下
     Set db = OpenDatabase(App.Path & "\" & "db1")
            Set rs = db.OpenRecordset("select * from zhiliao where tel = '" & strNew & "' ")
            With rs
                   If (rs.EOF = False) Then
                        If (rs.Fields(2) <> "") Then
                            mingc = rs.Fields(2)
                        End If
                        If (rs.Fields(4) <> "") Then
                            mem2 = rs.Fields(4)
                        End If
                        If (rs.Fields(6) <> "") Then
                            mem2 = rs.Fields(6)
                        End If
                    End If
            End With
            rs.Close
            db.Close把ACCESS已经转为97模式了
      

  3.   

    用 jet 操作数据库,那应该是缺少 dao 库,安装 access 了吗?
      

  4.   

    ADO库怎么安装啊,我刚安装了MDAC 2.8
    怎么不管用啊
      

  5.   

    楼主的这台机器上的程序大概是直接拷贝过来的吧?并且这台机器也正好没有安装ACCESS,所以才会这样的吧,还是老老实实作个安装包吧。