Modelo script VBS Conecta Impressora

'Mapeamento novas Impressoras

'Substitua SRV001 pelo nome do servidor qual a impressora a ser mapeada está instalada
'Substitua PRN00X pelo nome da impressora desejada
'Para mais de uma impressora, descomente as linhas abaixo e repita o procedimento.

ADICIONAR1 = "\\SRV002\PRN001"
'ADICIONAR2 = "\\SRV002\PRN002"

Set Impressoras = CreateObject("WScript.Network")

Impressoras.AddWindowsPrinterConnection ADICIONAR1
Impressoras.AddWindowsPrinterConnection ADICIONAR2
Impressoras.AddWindowsPrinterConnection ADICIONAR3
Impressoras.AddWindowsPrinterConnection ADICIONAR4
Impressoras.AddWindowsPrinterConnection ADICIONAR5
Impressoras.AddWindowsPrinterConnection ADICIONAR6