如果您正在使用 Windows XP 或 Windows Server 2003,那么,可以使用如下脚本来禁用“保留打印的文档”属性:
strComputer = "."
Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/cimv2")
Set colPrinters = objWMIService.ExecQuery _
("Select * From Win32_Printer Where DeviceID = 'ArtDepartmentPrinter'")
For Each objPrinter in colPrinters
objPrinter.KeepPrintedJobs = False
objPrinter.Put_
Next
其他版本的 Windows 上有点儿难。有多难?嗯,坦白地讲,完全不可能。