miércoles, 1 de septiembre de 2010

Script para borrar o instalar una impresora de red

Hoy os paso un par de scripts, uno para instalar una impresora de red y otro para borrar una impresora de red, es una forma sencilla de borrar o instalar una impresora con un doble clic.

Para crear el primer script (podéis llamarlo instala_impresora.vbs) pegad este código en un bloc de notas y guardad el fichero con extensión .vbs. Deberéis sustituir \\server\impresora por la ruta de la impresora de red que queráis instalar.

Set WshNetwork = WScript.CreateObject("WScript.Network")
Set objShell = CreateObject("Wscript.Shell")
WshNetwork.AddWindowsPrinterConnection "\\server\impresora"

Para crear el segundo script (podéis llamarlo borra_impresora.vbs) pegad este código en un bloc de notas y guardad el fichero con extensión .vbs. Deberéis sustituir \\server\impresora por la ruta de la impresora de red que queráis borrar.

Option Explicit
Dim objNetwork, strUNCPrinter, bForce, bUpdateProfile
strUNCPrinter = "\\server\impresora"
bForce = "True"
bUpdateProfile = "False"
Set objNetwork = CreateObject("WScript.Network")
objNetwork.RemovePrinterConnection strUNCPrinter, _
bForce, bUpdateProfile

Nunca vayáis a dormir sin aprender algo nuevo...

6 comentarios:

Anónimo dijo...

Muchas gracias, muy util y clarito ;)

Anónimo dijo...

Gracias,

Se que es una chorrada pero no lo encontraba tan sencillo y bien explicado como aquí.

Saludos.

Anónimo dijo...

Oye, esta buenisimo este Script, ¿crees que se pueda hacer algo similar para cambiar la configuracion de la misma impresora? ej. que imprima solo a color o negro

Anónimo dijo...

De verdad me sirvió mucho, gracias por tu aporte..!!!

Mark dijo...

Y si para mapear la impresora me pide User y Pass, como lo podría hacer?

Martin Jeffersson Moreno Calambas dijo...

Muy bueno pero consulta si quiero que no se instale si ya está instalada ,
La tengo cómo GPO en un server como hago para que se instale si no está y si no está se instale