Function DelPrinterConnections()
Dim $bk,$conn
$bk="HKEY_CURRENT_USER\Printers\Connections"
Do
$conn=DelKey($bk+"\"+EnumKey($bk,0))
Until @error
EndFunction


This is it