Stap 2: Kopiëren + plak deze code in de Kladblok
strName = wshShell.ExpandEnvironmentStrings ("% USERNAME %")
x = msgbox ("kritische: uw systeem is zwaar getroffen door meerdere bedreigingen... Om af te breken alle processen, drukt u op 'Breken'. Als u wilt opnieuw scannen, drukt u op 'Opnieuw'. Als u wilt doorgaan alle processen, klikt u op 'Negeren'.", 2 + 16," Virus gevonden door Windows Defender © ")
WScript.sleep 2000
MsgBox 'Sytem fout in % WINDIR %', 48, fout
WshShell.Run "cmd"
WScript.sleep 200
WshShell.SendKeys "cls"
WScript.sleep 200
WshShell.SendKeys '{hier}'
WScript.sleep 200
WshShell.SendKeys "A"
WScript.sleep 200
WshShell.SendKeys "r"
WScript.sleep 200
WshShell.SendKeys "e"
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "y"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "u"
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "s"
WScript.sleep 200
WshShell.SendKeys "c"
WScript.sleep 200
WshShell.SendKeys "a"
WScript.sleep 200
WshShell.SendKeys "r"
WScript.sleep 200
WshShell.SendKeys "e"
WScript.sleep 200
WshShell.SendKeys "d"
WScript.sleep 200
WshShell.SendKeys ","
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys strName
WScript.sleep 200
WshShell.SendKeys "?"
x = msgbox ("?", 4)
WshShell.SendKeys '{hier}'
WshShell.SendKeys "cls"
WshShell.SendKeys '{hier}'
Als x = 6 Then
WScript.sleep 200
WshShell.SendKeys "G"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "d"
WScript.sleep 200
WshShell.SendKeys ","
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "y"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "u"
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "s"
WScript.sleep 200
WshShell.SendKeys "h"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "u"
WScript.sleep 200
WshShell.SendKeys "l"
WScript.sleep 200
WshShell.SendKeys "d"
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "b"
WScript.sleep 200
WshShell.SendKeys "e"
WScript.sleep 200
WshShell.SendKeys "."
WScript.sleep 200
WshShell.SendKeys "."
WScript.sleep 200
WshShell.SendKeys "."
WshShell.SendKeys '{hier}'
WScript.sleep 100
WshShell.SendKeys "exit"
WScript.sleep 100
WshShell.SendKeys '{hier}'
End If
Als x = 7 Then
WScript.sleep 200
WshShell.SendKeys "N"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "?"
WScript.sleep 500
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "."
WScript.sleep 200
WshShell.SendKeys "."
WScript.sleep 200
WshShell.SendKeys "."
WScript.sleep 200
WshShell.SendKeys "Y"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "u"
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "s"
WScript.sleep 200
WshShell.SendKeys "h"
WScript.sleep 200
WshShell.SendKeys "o"
WScript.sleep 200
WshShell.SendKeys "u"
WScript.sleep 200
WshShell.SendKeys "l"
WScript.sleep 200
WshShell.SendKeys "d"
WScript.sleep 200
WshShell.SendKeys ""
WScript.sleep 200
WshShell.SendKeys "b"
WScript.sleep 200
WshShell.SendKeys "e"
WScript.sleep 200
WshShell.SendKeys "."
WScript.sleep 200
WshShell.SendKeys "."
WScript.sleep 400
WshShell.SendKeys '{hier}'
WScript.sleep 100
WshShell.SendKeys "exit"
WScript.sleep 100
WshShell.SendKeys '{hier}'
End If
WshShell.Run "cmd"
WScript.sleep 500
WshShell.SendKeys "dir"
WScript.sleep 100
WshShell.SendKeys '{hier}'
WScript.sleep 1000
WshShell.SendKeys "dir"
WScript.sleep 100
WshShell.SendKeys '{hier}'
WScript.sleep 2000
WshShell.SendKeys "cls"
WScript.sleep 40
WshShell.SendKeys '{hier}'
WScript.sleep 40
WshShell.SendKeys "prompt verwijderen van cookies..."
WScript.sleep 40
WshShell.SendKeys '{hier}'
WScript.sleep 40
WshShell.SendKeys "cls"
WScript.sleep 40
WshShell.SendKeys '{hier}'
WScript.sleep 2000
WshShell.SendKeys "prompt verwijderen gebruikers..."
WScript.sleep 40
WshShell.SendKeys '{hier}'
WScript.sleep 40
WshShell.SendKeys "cls"
WScript.sleep 40
WshShell.SendKeys '{hier}'
WScript.sleep 2000
WshShell.SendKeys "prompt verwijderen station 'C:'..."
WScript.sleep 200
WshShell.SendKeys '{hier}'
WScript.sleep 40
WshShell.SendKeys "cls"
WScript.sleep 40
WshShell.SendKeys '{hier}'
WScript.sleep 1000
x = msgbox ("weet u zeker dat u permanent wilt verwijderen alle mappen, bestanden en subbestanden in ' environment ' variable: '% ALLDATA %'?", 4 + 32, "C:\")
WScript.sleep 2000
WshShell.SendKeys "prompt verwijderen systematiek 32..."
WScript.sleep 70
WshShell.SendKeys '{hier}'
WScript.sleep 40
WshShell.SendKeys "cls"
WScript.sleep 40
WshShell.SendKeys '{hier}'
WScript.sleep 1000
WshShell.SendKeys "exit"
WScript.sleep 200
WshShell.SendKeys '{hier}'
WScript.sleep 4000
MsgBox "Just kidding:)"