我有一个用户需要打印大约220个文件，每个文件平均2-3页。 使用“全选”的标准Windows方法打印时 – 右键单击 – “打印”会压倒打印服务器或打印机本身。 我正在寻找一个实用程序，它允许我一次处理5个文档，这些文档将完成给定目录中的所有文档。 我希望这将减轻打印服务器上的压力，并且也将允许用户不必照顾他的打印作业。 我find了一个让你安排一个打印工作一段时间，但（也许这不是一个交易断路器）在程序中的拼写是残酷的。
回答一个老问题来build立声誉点：P
这个VBS打开并打印Word文档：
Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open("c:\scripts\inventory.doc") objDoc.PrintOut() objWord.Quit 这个VBS循环遍历文件夹中的文件：
Set objFSO = CreateObject("Scripting.FileSystemObject") objStartFolder = "C:\Scripts" Set objFolder = objFSO.GetFolder(objStartFolder) Set colFiles = objFolder.Files For Each objFile in colFiles Wscript.Echo objFile.Name Next
这个VBS导致PC等待60秒，以免淹没打印服务器：
WScript.sleep 60000
结合这些：
Set objFSO = CreateObject("Scripting.FileSystemObject") objStartFolder = "C:\Scripts" Set objFolder = objFSO.GetFolder(objStartFolder) Set colFiles = objFolder.Files For Each objFile in colFiles Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open(objFile) objDoc.PrintOut() objWord.Quit WScript.sleep 60000 Next
将您的“objStartFolder”更改为单词文档所在的文件夹，并确保该文件夹中只有单词文档。 将该代码保存到文本文件并将扩展名更改为“vbs”。 它可以通过双击或Windows调度程序启动，所以你可以在半夜启动或不Wotnot。
（假设你正在谈论MS Word），我不是任何一个Word专家，但你可以使用一些VBA来做到这一点，从脚本启动winword.exe。 我已经看到它完成，但从来没有足够的参与提供任何更多的信息。