Script instalar impresora con Drivers no en cab

19/07/2007 - 14:04 por Jorge | Informe spam

Hola, estoy con un script que añade unpuerto de red de impresora y una
impresora.
La impresora no esta en los cab de Win por lo que he visto otro script que
te crea el driver pero no me va ni para atras

strComputer = "Nombre_Equipo"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "oot\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"
objDriver.DriverPath = "\\SERVIDOR\S\UNIDRV.DLL"
objDriver.Infname = "\\SERVIDOR\S\hpc24x0c.inf"
intResult = objDriver.AddPrinterDriver(objDriver)

Siga el debate

1 respuesta

Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 Jorge

19/07/2007 - 21:48 | Informe spam

Ya lo tengo
Ademas de que el script por alguna razon que desconozco no acepta el nombre
"HP LaserJet 2420dn PCL6" en elcampo objDriver.Name lo he cambiado por HP
LAserJet (tampoco funcionaba con el nombre del ejemplo de abajo, longitud de
la cadena?)
Ademas he quitado la l9inea del inf y solo he dejado la del DriverPath

Con esto me funciona genial

Gracias de todos modos

"Jorge" wrote:

Hola, estoy con un script que añade unpuerto de red de impresora y una
impresora.
La impresora no esta en los cab de Win por lo que he visto otro script que
te crea el driver pero no me va ni para atras

strComputer = "Nombre_Equipo"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "oot\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"
objDriver.DriverPath = "\\SERVIDOR\S\UNIDRV.DLL"
objDriver.Infname = "\\SERVIDOR\S\hpc24x0c.inf"
intResult = objDriver.AddPrinterDriver(objDriver)

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida