VBScript to Print all Files from a Folder
14 views
Skip to first unread message
Md Ali Jaffry
Sep 13, 2012, 4:45:25 AM9/13/12
to lets-learn-...@googlegroups.com
TargetFolder = "\\xxx.xxx.xxx.xxx\c$\Inetpub\wwwroot\WebAdmin\Rewards\printdocs\"
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(TargetFolder)
Set colItems = objFolder.Items
For Each objItem In colItems
objItem.InvokeVerbEx ("Print")
Next
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(TargetFolder)
Set colItems = objFolder.Items
For Each objItem In colItems
objItem.InvokeVerbEx ("Print")
Next
Reply all
Reply to author
Forward
0 new messages