set objNetwork = WScript.CreateObject("WScript.Network")

'Gets Number of Printers Installed
Set colPrinters = objNetwork.EnumPrinterConnections

'This Part doesn't always work but its ok you do not need it
'Will Loop Though and Remove All Printers.
For i = 0 to colPrinters.Count -1 Step 2
	On Error Resume Next
	objNetwork.RemovePrinterConnection colPrinters.Item(i+1)
	On Error Goto 0
Next