我是业余的VB脚本编写者。我正在制作一个脚本来检查是否存在两个文件中的一个,如果存在,则给出一个标记为“已安装”的标记。如果两个文件都不存在,则标记“未安装”。这是我的剧本......
Option Explicit
DIM fso
Set fso = CreateObject("Scripting.FileSystemObject")
CreateObject("WScript.Shell")
If (fso.FileExists("C:\Program Files (x86)\Dell\KACE\AMPAgent.exe")) OR (fso.FileExists("C:\Program Files\Dell\KACE\AMPAgent.exe")) Then
WScript.Echo("Installed")
WScript.Quit()
Else
WScript.Echo("Not Installed")
WScript.Quit()
End If
当我在Windows 7中运行它时,它可以工作。当我将它添加到BGInfo时,它会抛出此错误......
评估脚本字段“KACE”
时出错Microsoft VBScript运行时错误
第7行,第2位
变量未定义:'WScript'
[OK]
我认为我只需要一种方法来定义或调用WScript来执行操作,因为它显然不是通过BGInfo自行完成的,而我所做的并不起作用。我还没有看到任何有关StackOverflow上此特定问题的帮助。
有什么想法?
答案 0 :(得分:6)
BGInfo实现了自己的脚本主机,似乎不会模拟WScript对象。浏览some snippets我在互联网上发现,它看起来就像是在BGInfo内部简单的Echo。一个片段:
On Error Resume Next
call WScript.Echo(strReturn) 'for cmd line
call Echo(strReturn) 'for BGInfo
on error goto 0
注意On Error如何帮助它以任何方式工作。