Script to set the last loaded printer as the default printer

Set WshNetwork = WScript.CreateObject("WScript.Network")
Set oPrinters = WshNetwork.EnumPrinterConnections
For i = 0 to oPrinters.Count - 1 Step 2 
  Device = oPrinters.Item(i+1) 
Next
WshNetwork.SetDefaultPrinter Device