VB“Automation 错误” 或 “无法定位程序输入点 DoOpenPipeStream 于动态链接库ScrRun.dll上”...

说明：“Automation 错误”其实是VB调用程序或组件时，程序或组件返回的错误，因此需要考虑这些组件是否能正确运行

如在某些机器上运行以下代码时：

Dim WshShell As Object Set WshShell = CreateObject("wscript.shell") runAndWaitExe = WshShell.Run(strCommand, 0, True)

会产生“AutoMation 错误”，原因是"Wscript.Shell"无法正常运行

-------------------------------------------------------------------------------------------------------------------------

以下方法转自网络，已经成功地解决问题！

错误消息和前面的一样“WSript.exe - 无法找到入口 ”，无法创建名为“Wscript.Shell”的对象。于是开始了疯狂百度，原因是说要么脚本被禁用（不可能，因为弹出消息来了嘛），二是文件被改动。网上一般是说注册两个组件就OK了，如下：

regsvr32 srcrun.dll （命令成功）
regsvr32 wshom.ocx （弹出错误提示：无法定位程序输入点 DoOpenPipeStream 于动态链接库ScrRun.dll上）

前一个执行成功，后一个怎么弄都是错误，消息是“LoadLibary("wshom")失败，找不到指定的程序”，看了看system32目录下，wshom.ocx是有的。后来开始认识到可能是wshom.ocx被破坏了，于是找了相同版本的电脑（我的是XP SP3），然后写段脚本，把下面的文件拷出来：

mkdir c:/repair
set source=%windir%/system32
set target=c:/repair
copy %source%/cscript.exe %target%
copy %source%/jscript.dll %target%
copy %source%/scrobj.dll %target%
copy %source%/scrrun.dll %target%
copy %source%/vbscript.dll %target%
copy %source%/wscript.exe %target%
copy %source%/wshext.dll %target%
copy %source%/wshom.ocx %target%
pause

并将对方机器上的c:/repair目录拷贝到我的c:/下，然后用下列脚本更新：

set source=c:/repair
set target=%windir%/system32
copy %source%/cscript.exe %target%
copy %source%/jscript.dll %target%
copy %source%/scrobj.dll %target%
copy %source%/scrrun.dll %target%
copy %source%/vbscript.dll %target%
copy %source%/wscript.exe %target%
copy %source%/wshext.dll %target%
copy %source%/wshom.ocx %target%
regsvr32 %target%/jscript.dll
regsvr32 %target%/scrobj.dll
regsvr32 %target%/scrrun.dll
regsvr32 %target%/vbscript.dll
regsvr32 %target%/wshext.dll
regsvr32 %target%/wshom.ocx
pause

完成后使用脚本测试CreateObject("WScript.Shell")成功，

VB“Automation 错误” 或 “无法定位程序输入点 DoOpenPipeStream 于动态链接库ScrRun.dll上”...相关推荐

安装jdk8出现无法定位程序输入点regdeletekeyexa于动态链接库ADVAPI32.dll上
官方的 jdk8 不支持xp, 在xp上安装会提示动态链接库错误. 无法定位程序输入点 RegDeleteKeyExA 于动态链接库 ADVAPI32.dll 上. xp安装 jdk8 方法 ...
无法定位程序输入点packetgetreadevent于动态链接库wpcap.dll上
参考百度问答:无法定位程序输入点 PacketGetReadEvent 于动态链接库 packet.dll上_百度知道 0.前言领导给了个C++的摄像机demo,编译成x64位运行没问题,但是编译成 ...
无法定位程序输入点K32EnumProcessModules于动态链接库KERNEL32.dll上
转自VC错误:http://www.vcerror.com/?p=2113 问题描述: 使用vs2013编译出来的程序,在xp下运行的时候出现如下错误: 无法定位程序输入点K32EnumProcess ...
postman安装报错无法定位_VS2010 + winxp 无法定位程序输入点GetTickCount64 在动态链接库kernel32.dll上错误...
winxp系统,使用VS2010, 在使用boost中的thread中的sleep的时候出现 "无法定位程序输入点GetTickCount64 在动态链接库kernel32.dll上&quo ...
关于 UE4 (虚幻引擎4) 4.25.1版本提示“无法定位程序输入点 DXGIGetDebugInterface1 于动态链接库dxgi.dll上”的错误的解决办法
关于 UE4 (虚幻引擎4) 4.25.1版本提示"无法定位程序输入点 DXGIGetDebugInterface1 于动态链接库dxgi.dll上"的错误的解决办法: 1.原因: ...
安装Qt creator时出现无法定位程序输入点_except1 于动态链接库MSVCR120.dll上
开始不知道怎么回事一直出现无法定位程序输入点,_except于动态链接库MSVCR120.dll上,重新下了几个Qt版本同样出现这样的问题,后来在网上查了一下这两天回老家了,没事打算在笔记本上装个 ...
无法定位程序输入点 inet_ntop 于动态链接库 WS2_32.dll上
搜索了一下工程里, 根本没有使用到inet_ntop这个函数, 但是debug版运行的时候提示这个错误无法定位程序输入点 inet_ntop 于动态链接库 WS2_32.dll上解决方法: 项目- ...
无法定位程序输入点H5Rdereference于动态链接库 libmat.dll上
无法定位程序输入点H5Rdereference于动态链接库 libmat.dll上最近想做一个项目,其中需要调用matlab中的动态库,读取.mat文件.按照网上的教程,在win10下vs2019配 ...
win2000启动时提示“无法定位程序输入点SaferCreateLevel于动态链接库ADVAPI32.dll上”怎么解决？
win2000启动时提示"无法定位程序输入点SaferCreateLevel于动态链接库ADVAPI32.dll上"怎么解决?谢谢悬赏分:5 - 解决时间:2006-5-10 2 ...

VB“Automation 错误” 或 “无法定位程序输入点 DoOpenPipeStream 于动态链接库ScrRun.dll上”...

VB“Automation 错误” 或 “无法定位程序输入点 DoOpenPipeStream 于动态链接库ScrRun.dll上”...相关推荐

最新文章

热门文章