vbscript: comment imprimer plusieurs fichiers avec la boîte de dialogue de sélection d'imprimante une fois

Question

Je dois écrire vbscript qui imprime tous les fichiers dans un dossier. La boîte de dialogue d'imprimante doit apparaître au tout début pour permettre à l'utilisateur de sélectionner l'imprimante à utiliser. Que tous les fichiers doivent être envoyés à l'imprimante en mode silencieux

Comment puis-je faire cela?

Merci d'avance!

Answer 1

Enfin, je produit quelque chose comme ça (simplifié):

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