‎01-26-2010 11:04 AM
Win2PDF PDFFILE: 26.01.2010
pdfFactory Pro FPP2: 26.01.2010
Microsoft XPS Document Writer XPSPort: 26.01.2010
Microsoft Office Document Image Writer Microsoft Document Imaging Writer Port: 26.01.2010
strComputer = "SomeServer"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colPrinters = objWMIService.ExecQuery("Select * From Win32_Printer")
For Each objPrinter in colPrinters
If objPrinter.Attributes And 64 Then
strPrinterType = "Local"
Else
strPrinterType = "Network"
End If
Wscript.Echo objPrinter.Name & " -- " & strPrinterType
Next
Z:\>cscript ListPrinters.vbs
Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation. All rights reserved.
Zetafax Printer -- Local
Win2PDF -- Local
pdfFactory Pro -- Local
Microsoft XPS Document Writer -- Local
Microsoft Office Document Image Writer -- Local
Mamut Virtual Printer 5 -- Local
Mamut Virtual Printer 4 -- Local
KSDPDFPRINTER -- Local
‎01-26-2010 12:53 PM
‎01-26-2010 12:48 PM
‎01-26-2010 12:25 PM
‎01-26-2010 11:17 AM
‎01-26-2010 11:46 AM
Lansweeper wrote:
Could you output all fields please
‎01-26-2010 11:11 AM
‎01-26-2010 11:09 AM
Experience Lansweeper with your own data. Sign up now for a 14-day free trial.
Try Now