如何打开打印机的打印队列

如何打开打印机的打印队列

Kingron

下面的代码演示了如何打开Adobe PDF打印机，请修改"ADobe

PDF"为你自己的打印机的名字即可：

set sa = CreateObject("Shell.Application")

set f = sa.NameSpace(4)

if not f is nothing then

 set p = f.ParseName("Adobe PDF")

 if not p is nothing then

   p.InvokeVerb()

   WScript.Sleep 25000

 end if

end if