Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat. The purpose of this eBook is to educate the reader about ransomware attacks.
'Delete all the old Server printers ' 21 Feb 2011 - first version by Leigh Wardle dim boolDebug boolDebug = True boolDebug = False Set objNetwork = CreateObject("WScript.Network") Set objPrinters = objNetwork.EnumPrinterConnections if boolDebug then Wscript.echo "objPrinters.count=" & objPrinters.count End If For i=0 to objPrinters.count-1 if boolDebug then wscript.echo "Printer Name: " & objPrinters.Item(i) end if If Instr(Lcase(objPrinters.Item(i)),"server") Then if boolDebug then wscript.echo objPrinters.Item(i) end if If Instr(Lcase(objPrinters.Item(i)),"server2008") Then 'do not delete Else if boolDebug then Wscript.echo "delete - " & objPrinters.Item(i) objNetwork.RemovePrinterConnection objPrinters.Item(i) End If End If End If Next if boolDebug then Wscript.echo "script complete" End If
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.