使用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吗？ Microsoft通过一些更改导致了该问题。 请参阅以下文章 。