连接数据库的奇怪错误, 高手帮忙看看啊!

只是很普通的一段代码,前面连接数据库,窗体上有一个TextBox控件,叫Text1,我设置它的DataSource属性
运行后最后一句会报错(我已经在references中加入了Microsoft Activex Data Objects 2.7 Library)  Dim db As ADODB.Connection
  Set db = New ADODB.Connection
  db.CursorLocation = adUseClient
  db.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=F:\Northwind.mdb;"  Set adoprimaryrs = New ADODB.Recordset
  adoprimaryrs.Open "select * from Employees", db, adOpenStatic, adLockOptimistic
  
  adoprimaryrs.MoveNext
  Set Text1.DataSource = adoprimaryrs错误大概就是找不到对象
Run-Time error 713
class not registered
Looking for object with CLSID{59245250-7A2F-11D0-9482-00A0C91110ED}会是什么原因呢

解决方案 »

  1.   

    我也知道应该没有问题， 所以我怀疑我的VB是不是有问题
    代码是写在窗体的load函数里面的，是不是我少装了什么类啊
    前几天刚刚装好.net 2003,会不会有关系
      

  2.   

    不防设一下text1.datafield属性后，再试一下
      

  3.   

    dim adoprimaryrs as Recordset
      

  4.   

    这不是连接错误,而是你的类没有注册
    到其他机器去运行,要先注册类和.ocx
    可以到注册表里注册,或者打包,将类注册
      

  5.   

    你后来装的软件将ado破坏了
    卸载重装后重新注册一下
      

  6.   

    你好象沒有設置 text1 綁定的是哪個字段﹐使用 text1.datafield = "" 看看
      

  7.   

    卸载VB,然后重新安装VB。然后打上Sp5。应该没有问题了。
      

  8.   

    Common File\system\ado\*.reg 的文件重新执行注册一下就行
      

  9.   

    这可能是你装的.net中含有的ADO组件对VB中的组件进行了更新造成的！