libo9147

如果您正在使用 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 上有点儿难。有多难？嗯，坦白地讲，完全不可能。