>I see that set("printer",2) will give me the name of the current printer. But what will give me the current output of the printer. For example the current output for my printer is OUTPUT=\\IBMNT\Upstairs. What command or commands can I use to get this information?

Actually set("printer",2) returns default windows printer and set("printer",3) default VFP printer.
You can use WSH to get the port and the network mapping. See sample code below

oNet = CREATEOBJECT("WScript.Network")
oPrinters = oNet.EnumPrinterConnections()
? "Network printer mappings:"
For i = 0 to oPrinters.Count - 1 Step 2
   ? "Port " + oPrinters.Item(i) + " = " + oPrinters.Item(i+1)
Next