vbscript - 引入延迟以允许完成 word doc 的打印

Question

我有以下代码可以从 vbscript 打印 word 文档

Set objWord = CreateObject("Word.Application")
objWord.Caption = "Test"
objWord.Visible = False

Set objDoc = objWord.Documents.Open("c:\test.doc")

'now print to default printer
objDoc.PrintOut()

MsgBox("Finished!")

'close word application
objWord.Quit 0

我想删除消息框并让脚本静默运行并完成，但是当消息框的延迟被删除时，脚本在打印文档之前完成。

有没有办法做到这一点？

非常感谢

戴夫

Answer 1

将其替换为 sleep 命令，如下所示。1000 是一秒，所以根据需要进行调整。200 可能适用于您的脚本。

WScript.Sleep 1000