VB6中的ADODB.Connection - 打开方法失败，运行时错误'2147221164（80040154）'

Question

这是我正在工作的项目开始发生的事情，到目前为止我无法找出根本原因。

这停止了工作，没有任何改变，我自上次在该项目上工作以来，我所知道的唯一变化是磁盘发生故障（曾经是安装了某些应用程序的E：驱动器）。 操作系统是Windows Server 2003。

错误下方：

Runtime Error

我要添加到项目中的库如下：

• Visual Basic For Applications
• Visual Basic运行时对象和过程
• Visual Basic对象和过程
• OLE自动化
• 适用于Windows 2000 Library的Microsoft CDO
• Microsoft Scripting Runtime
• Windows脚本主机对象模型
• Microsoft数据绑定集合VB6（SP4）
• Microsoft ActiveX Data Objecrs 2.8 Library

通过以下方式声明和实例化对象oConn：

1. Dim oConn AS ADODB.Connection
2. 设置oConn =新ADODB.Connection

VB项目中没有引用被标记为MISSING。

我也尝试过后期绑定，但没有成功。我尝试使用regsrv32.exe重新注册msado15.dll，但没有快乐。

我真的没有想到这里，我认为由于磁盘故障，一些依赖关系不再满足，但我不知道如何调查这一点，因为IDE提供了一些细节。

由于

Answer 1

这个问题没有简单的答案。我在@Jim Hewitt的评论中也发现了这一点，即Windows Server 2003上的MDAC已损坏。组件检查器实际上无法识别MDAC的版本，MDAC是该版本Windows中的嵌入式组件。 总而言之，整个Windows安装已损坏（不知道如何发生这种情况）并且Visual Basic 6无法正常工作。解决方案是设置另一台机器。