Renombrar impresoras en entornos terminal server

En muchos escenarios nos encontramos necesidades, que se ven cubiertas con los servicios de terminal server.
Suelen dar muy buenos resultados, y la forma de trabajar con ellos, para el usuario final, es cómoda, y no supone excesivas complicaciones.

Donde me he encontrado en multitud de ocasiones problemas, en estos entornos, es en lo referente a las impresiones.

Normalmente el problema de funcionamiento de las aplicaciones con las impresoras que conectamos a los servicios de terminal server, vienen dado por el nombre que cogen las impresoras del tipo:
nombre de impresora en sessión 1
Para solventar este problema, alguna vez he utilizado una serie de scripts los cuales nos permiten modificar los nombres de la impresora.

-Script para poner como nombre de impresora, el nombre del usuario que se loguea

--------------------------------------------------------------

strComputer = "."
Dim Shell
set shell = createobject("wscript.shell")
set env = shell.environment("process")
username = env("username")

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

Set colInstalledPrinters = objWMIService.ExecQuery _
("Select * from Win32_Printer Where default=true")

For Each objPrinter in colInstalledPrinters
objPrinter.RenamePrinter username
Next


------------------------------------------

- Script que nos deja renombrar la impresora con el nombre que queramos
nota: en negrita es donde tenemos que poner el nombre que queremos darla

-------------------------------



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

Set colInstalledPrinters = objWMIService.ExecQuery _
("Select * from Win32_Printer Where default=true")

For Each objPrinter in colInstalledPrinters
objPrinter.RenamePrinter("nombre_impresora")
Next

---------------------------------------


A tener en cuenta...
-Se modificará la impresora que tengamos seleccionada como predeterminada.
-Los privilegios que debe de tener el usuario tienen que ser como mínimo los de "usuario avanzado"
-Los scripts es recomendable lanzarlos en el inicio de la sesión.
-Para generar los ficheros: Copiar los códigos en un txt y renombrarlos con extensión vbs.
-Después simplemente ejecutarlos

Saludos