有系列word文档(不下300个),存放在多个文件夹下(不下40个),
有什么办法可以不逐一打开文档进行打印???
多谢!
---------------------------------------------------------------
批量打印WORD文档 1.1
http://www.onlinedown.net/soft/20626.htm
本软件可快速批量打印多达65535份WORD文档;可以任意设置每份文档的打印份数;文档名称需按“文档名称-打印份数.doc”格式设置,如“我的文档-5.doc”将打印5份。
本软件适合于打印大量WORD文档,只需在命名时设置打印份数,免却以往打印时需打开每一份文档之繁琐。
---------------------------------------------------------------
可利用2k/xp系统自带的print命令
先设置好默认打印机,然后在cmd.exe下切换到所有文档所在的根目录,运行如下命令:
for /F %i in ('dir *.doc /b /s') do print "%i"
如果在批处理里,要把%i换成%%i
如果系统自带的PRINT不好用(因为没接打印机,所以自己没测试过),可以把如下内容复制到print.vbs
Dim objWord
Dim strFile
If WScript.Arguments.Count < 1 Then
WScript.Echo("Usage: printdoc.vbs file.doc")
WScript.Quit
End If
strFile = Wscript.Arguments(0)
Set objWord = WScript.CreateObject("Word.Application")
objWord.Documents.Open strFile
objWord.ActiveDocument.PrintOut
Wscript.Sleep(1000)
objWord.ActiveDocument.Close
objWord.Quit
然后使用for /F %i in ('dir *.doc /b /s') do cscript //Nologo print.vbs "%i"
如果在批处理里,要把%i换成%%i
---------------------------------------------------------------