Normalmente cuando mapeamos una impresora via VBS utilizamos el siguiente script:
If MemberOf(ObjGroupDict, "Print-Group") Then
WSHNetwork.AddWindowsPrinterConnection "\\Print-Server1\Print-Queue-001"
WSHNetwork.AddWindowsPrinterConnection "\\Print-Server2\Print-Queue-002"
WSHNetwork.SetDefaultPrinter "\\Print-Server1\Print-Queue-001"
End If
Ahora bien, si queremos mapear como default una print queue la cual es local y al mismo usuario se le estan mapeando otras print queue debemos agregar la siguiente linea de script. La misma debe tener el mismo nombre con el que fue instalada la impresora:
If strUserName = "Admin_001" Then
WSHNetwork.AddWindowsPrinterConnection
\\Print-Server\Print-Queue-001
WSHNetwork.SetDefaultPrinter "Fax - HP Officejet Pro 8500 A910"
End If
Saludos,
Gaston A. Gimené - MCP(MCTS) MCTS: Microsoft Certified Technology Specialist
