![social booth change default printer social booth change default printer](https://www.wikihow.com/images/5/59/Change-the-Default-Printer-on-a-Mac-Step-5.jpg)
![social booth change default printer social booth change default printer](https://s3.amazonaws.com/cdn.freshdesk.com/data/helpdesk/attachments/production/3043421243/original/Dwan_nItXbmSLnoZSglOqO6QdvZ1C7WQyg.png)
If UCase(colprinters.Enable this to have photos automatically print when the session is complete. If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-421" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-420" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-420" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-419" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-419" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-418" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-418" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-417" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-417" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-416" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-416" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-415" Then
![social booth change default printer social booth change default printer](https://s3.amazonaws.com/cdn.freshdesk.com/data/helpdesk/attachments/production/3012153510/original/blob1440936289922.png)
If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-415" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-414" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-414" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-413" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-413" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-412" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-412" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-411" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-411" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-410" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-410" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-409" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-409" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-408" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-408" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-407" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-407" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-406" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-406" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-405" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-405" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-404" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-404" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-403" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-403" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-402" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-402" Then If UCase(colprinters.Item (i + 1)) = "\\PM3-CGPRINT02\GY-GROUP-401" Then If UCase(colprinters.Item (i + 1)) = "\\\GY-GROUP-401" Then Set colPrinters = objNetwork.EnumPrinterConnections Set objNetwork = WScript.CreateObject("WScript.Network") ' and scan for the ones we need to change.
![social booth change default printer social booth change default printer](https://fotomasterltd.zendesk.com/hc/article_attachments/360005636474/mceclip4.png)
' Get a list of currently connected printers 'Description VBS Script for The Republic for pointing users print queues to the Death Star Printer Server The problem I have is I have yet to find a way to scan for the default printer, note it, and set the default as corresponding new print server queue. It scans their machine to see what printers are installed and if there are any queues pointing to the old print server, they are replaced with the new print server queue. The script will run via group policy when a user logs in. I have created a vbscript to replace queues pointing to an old print server with queues pointing to a new print server.