无法执行剪切粘贴 VBScript答案

【问题标题】：Cannot execute cut-n-paste VBScripts无法执行剪切粘贴 VBScript
【发布时间】：2010-03-12 17:17:15
【问题描述】：

我一直想弄清楚为什么我的脚本不起作用，直到我开始直接从几个网站复制和粘贴示例源代码，结果它也在那里失败了。我的 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 吗？

【问题讨论】：

【解决方案1】：

命名参数 (Param:=Value) 是 Visual Basic 和 VBA 功能； VBScript 不支持此语法。

在 VBScript 中，您需要保留例程参数的实际顺序。如果特定参数是可选的，并且您想使用其默认值，则只需忽略该参数即可。因此，您的代码应如下所示：

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

【讨论】：