![]() Loading |
VBScript |
JavaScript |
Powershell |
Search Options: Install a Printer Driver not Found in Drivers Cab
|
||
' Description: Installs a hypothetical printer using a print driver not found in Drivers.cab.
strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") objWMIService.Security_.Privileges.AddAsString "SeLoadDriverPrivilege", True Set objDriver = objWMIService.Get("Win32_PrinterDriver") objDriver.Name = "NewPrinter Model 2900" objDriver.SupportedPlatform = "Windows NT x86" objDriver.Version = "3" objDriverPath = "C:\Scripts\NewPrinter.dll" objInfname = "C:\Scripts\NewPrinter.inf" intResult = objDriver.AddPrinterDriver(objDriver) | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: |