Autohotkey 中文论坛

完整版: 批量打印同一文件夹内的Word文档
你目前正在浏览的是简化版. 请点击这里浏览完整版
有时候需要打印大量的Word文档,一个一个打开打印很麻烦,就写了个脚本
注意:需要安装PDFfactory4.5虚拟打印机,这样做的好处是提交到打印机之前可以预览一下,避免打错,浪费纸张。
使用方法:将以下代码保存成ahk文件放入有Word文档的文件夹中,执行即可
代码:
;;读取默认打印机@HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows\Device
RegRead, defprt, HKEY_CURRENT_USER, Software\Microsoft\Windows NT\CurrentVersion\Windows, Device
FileDelete, %A_WorkingDir%\~$*.doc* ;;删除临时文件

MsgBox, 4, 打印确认, 确认开始? ;询问是否进行操作
  IfMsgBox, No ;;如果No按钮被按下则终止
  ExitApp
  IfMsgBox, Yes ;;如果Yes按钮被按下则进行指定操作
  ;;设置默认打印机为pdffactory 4
            RegWrite, REG_SZ, HKEY_CURRENT_USER, Software\Microsoft\Windows NT\CurrentVersion\Windows, Device, pdfFactory Pro,winspool,FPP4:
Loop, %A_WorkingDir%\*.doc*
{
RunWait, print %A_LoopFileName%
        ; runwait 命令,等一个程序启动完成之后再循环启动下一个程序,直到循环自动退出。
}
If ErrorLevel
    MsgBox, 0, 错误, 无法进行指定操作 ;出现错误则提示用户
;;打印完毕恢复默认打印机
Sleep 1000
RegWrite, REG_SZ, HKEY_CURRENT_USER, Software\Microsoft\Windows NT\CurrentVersion\Windows, Device, %defprt%
还没打印机...
这个代码我学会了如何设置默认打印机。
批量打印word不用那么麻烦,资源管理器选中office文档,word,excel都行,右键,打印就行了。资源管理器中也有打印按钮,功能一样
参考网址