[THIN] Re: Farm Drivers List

  • From: "Rick Mack" <ulrich.mack@xxxxxxxxx>
  • To: thin@xxxxxxxxxxxxx
  • Date: Thu, 6 Sep 2007 07:21:44 +1000

Hi,

Try this script for Windows Server 2003:


' listdrivers.vbs - list all installed printer drivers

Dim DrvArray

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel = impersonate}!\\" & strComputer & "\root\cimv2")

Set colInstalledPrinters =  objWMIService.ExecQuery _
    ("Select * from Win32_PrinterDriver")

For each objPrinter in colInstalledPrinters
    DrvArray = split(objPrinter.Name,",")
    Wscript.Echo DrvArray(0)
Next
regards,

Rick

-- 
Ulrich Mack
www.commander.com

Other related posts: