无法执行cut-n-paste VBScripts

Question

我一直在疯狂地试图弄清楚为什么我的脚本不能正常工作,直到我开始直接从几个网站复制和粘贴示例源代码,只是让它失败了.我的VBScripts中出现以下错误:

C:\ temp\vbs\script.vbs(19,53)Microsoft VBScript编译错误:预期语句'

对于一行代码如下:

    wdoc.Application.Selection.Find.Execute Replace:=wdReplaceAll

这与Office 2007中的Microsft Word连接以进行搜索和替换.索引53直接指向:=赋值的一部分.由于这种语法在我的机器上不起作用,我在几个网站上使用它,我想知道我使用的cscript.exe是否已过时.

我没有正确地调用cscript吗？

Answer 1

命名arguments(Param:=Value)是Visual Basic和VBA功能; VBScript中不支持此语法.

在VBScript中,您需要保留例程参数的实际顺序.如果特定参数是可选的并且您想要使用其默认值,则只需省略该参数即可.所以,你的代码应该是这样的:

Const wdReplaceAll = 2
wdoc.Application.Selection.Find.Execute , , , , , , , , , , wdReplaceAll