Script de Instalación de Impresoras IP

Esto te está pasando porque estás instalando las impresoras como impresoras
locales, no como impresoras de red, y eso requiere provilegios que no tiene
un usuario normal. Si no quieres tener estos problemas, lo mejor es que las
impresoras locales en servidores y en los scripts de los clientes conectes a
las impresoras de red. Para conectar a una impresora de red:

Set obj_NW = CreateObject("WScript.Network")
obj_NW.AddWindowsPrinterConnection \\servidor\impresora

Un saludo
Fernando Reyes [MS MVP]
MCSE Windows 2000 / 2003
MCSA Windows Server 2003
http://freyes.svetlian.com
http://urpiano.wordpress.com
RSS: http://urpiano.wordpress.com/feed
freyes.champú@champú.mvps.org
(Aclárate la cabeza si quieres escribirme)


"Marta" escribió en el mensaje de noticias
news:
Hola Grupo,

Tengo que crear un script que instale impresoras Ip en un dominio. Las
impresoras estan en distintios sitios fisicos, i tienen rangos de ip
distintos.

Tengo un script que me pide permisos de administrador cada vez que lo
intento ejecutar, y las workstation son Usuarios normales.

El script es algo así:

'PARAMETRO COMUN--
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "oot
\cimv2")

'LAN-FAX TIENDA
'CREAR PUERTO
Set objNewPort objWMIService.Get("Win32_TCPIPPrinterPort").SpawnInstance_
objNewPort.Name = "IP_192.168.100.190"
objNewPort.Protocol = 1
objNewPort.HostAddress = "192.168.100.190"
objNewPort.PortNumber = "9100"
objNewPort.SNMPEnabled = False
objNewPort.Put_

'CREAR IMPRESORA
Set objPrinter = objWMIService.Get("Win32_Printer").SpawnInstance_
objPrinter.DriverName = "Nombre Impresora"
objPrinter.PortName = "IP_192.168.100.190"
objPrinter.DeviceID = "LD-TIENDA-FAX-RIC2022"
objPrinter.Location = "Tienda"
objPrinter.Network = True
objPrinter.Shared = False
objPrinter.Put_

Alguien puede ayudarme, para que el script funcione y no me pida
permisos de administrador? Tengo varias impresoras por implementar.

Gracias!