我正在对 VB6 应用程序进行一些小的更新。它在连接到 SQL Server 2000 数据库的 Windows 2000 服务器上运行。
我从服务器获取了源代码的副本,对其进行了更新并在本地编译。我的本地机器正在运行 Windows 7 64x。我将 .exe 文件复制回服务器,当我尝试运行它时收到运行时错误 49:Activex 组件无法创建对象。我知道当应用程序尝试使用 RDO 打开与数据库的连接时会发生此错误。
我可以从我的本地机器和运行 windows xp 的虚拟电脑上运行 .exe。
这个应用程序以前在服务器上工作,我所做的更改是对其输出的文件的内容,因此不需要新的引用。
这些是它落在上面的线:
rdoEnvironments(0).CursorDriver = rdUseNone
Set conDB = rdoEnvironments(0).OpenConnection("MRA", rdDriverNoPrompt, True)