vbscript：如何用打印機選擇對話框打印多個文件一次

Question

我必須編寫打印文件夾中所有文件的vbscript。 打印機對話框應該在最開始彈出以允許用戶選擇打印機使用。比所有文件都應該悄悄發送到打印機

我該怎麼做？

預先感謝您！

Answer 1

最後我公司生產是這樣的（簡化）：

set objPrnDlg = CreateObject("MSComDlg.CommonDialog") 
objPrnDlg.PrinterDefault = True 
objPrnDlg.ShowPrinter 

set objShell = CreateObject("Shell.Application") 
set objFolder = objShell.Namespace(path-to-files) 
set colItems = objFolder.Items 
for each objItem In colItems 
    objItem.InvokeVerbEx ("Print") 
next