使用VB6打开记录集时出现“未注册类”错误

Question

我最近开始遇到这个问题。不知道它是如何开始但我知道我禁用了一些启动的Windows服务，并删除了一些odbc，可能是一个mysql odbc数据源，但我正在使用MS SQL 2000以下。

我在尝试填充记录集时遇到错误，错误详情如下： “运行时错误'-2147221164（80040154）'：未注册类。”

Private Sub cmdTestConnection_Click()
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.ConnectionString = "Provider=SQLOLEDB.1;Initial Catalog=dbname;Data Source=mrtestpc2\sql2000pwd;Extended Properties=uid=sa;pwd=passwordhere;"
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
conn.Open
rs.Open "select * from tablename", conn 'ERROR here
MsgBox CStr(rs.RecordCount)
End Sub

我勾选的可能与此问题相关的参考文献是： Microsoft ActiveX数据对象2.8库

我尝试过使用上述参考的不同版本，从2.8到2.5，但仍然遇到同样的问题。

编辑：我正在试图弄清楚它是否是MDAC问题。 编辑：我正在运行windows xp sp3。

Answer 1

您运行的是Windows 7 SP1吗？微软通过一些变化引发了这个问题。请参阅以下article。