Stap 4: Twee valse virussen
Voorbeeld 1:
Prank.vbs:
set wshshell = wscript. CreateObject("wscript.shell")
WshShell.run "Kladblok"
WScript.Sleep 2000
WshShell. AppActivate "Kladblok"
WshShell.SendKeys"A"
WScript.Sleep 145
WshShell.SendKeys"l"
WScript.Sleep 101
WshShell.SendKeys"l"
WScript.Sleep 125
WshShell.SendKeys""
WScript.Sleep 250
WshShell.SendKeys"y"
WScript.Sleep 150
WshShell.SendKeys"o"
WScript.Sleep 130
WshShell.SendKeys"u"
WScript.Sleep 161
WshShell.SendKeys"r"
WScript.Sleep 140
WshShell.SendKeys""
WScript.Sleep 185
WshShell.SendKeys"b"
WScript.Sleep 150
WshShell.SendKeys"a"
WScript.Sleep 112
WshShell.SendKeys"s"
WScript.Sleep 136
WshShell.SendKeys"e"
WScript.Sleep 145
WshShell.SendKeys""
WScript.Sleep 130
WshShell.SendKeys"a"
WScript.Sleep 190
WshShell.SendKeys"e"
WScript.Sleep 108
WshShell.SendKeys"r"
WScript.Sleep 250
WshShell.SendKeys"{BS}"
WScript.Sleep 90
WshShell.SendKeys"{BS}"
WScript.Sleep 108
WshShell.SendKeys"r"
WScript.Sleep 250
WshShell.SendKeys"e"
WScript.Sleep 190
WshShell.SendKeys""
WScript.Sleep 130
WshShell.SendKeys"b"
WScript.Sleep 161
WshShell.SendKeys"e"
WScript.Sleep 140
WshShell.SendKeys"l"
WScript.Sleep 152
WshShell.SendKeys"o"
WScript.Sleep 150
WshShell.SendKeys"n"
WScript.Sleep 129
WshShell.SendKeys"g"
WScript.Sleep 200
WshShell.SendKeys""
WScript.Sleep 130
WshShell.SendKeys"t"
WScript.Sleep 161
WshShell.SendKeys"o"
WScript.Sleep 140
WshShell.SendKeys""
WScript.Sleep 118
WshShell.SendKeys"u"
WScript.Sleep 150
WshShell.SendKeys"s"
WScript.Sleep 250
WshShell.SendKeys"!"
WScript.Sleep 500
WshShell.SendKeys""
WScript.Sleep 200
WshShell.SendKeys":"
WScript.Sleep 300
WshShell.SendKeys"P"
WScript.Sleep 500
WshShell.run "virus.bat"
WScript.Sleep 700
tekst = msgbox ("All Your Base Are Belong aan ons", 16, "Dat u een Virus hebt")
tekst = msgbox ("you want to wegvagen naar de virus?", 20, "Dat u een Virus hebt")
tekst = msgbox ("All Your Base Are Belong aan ons", 16, 'Toegang geweigerd')
tekst = msgbox ("All Your Base Are Belong aan ons", 16, 'Toegang geweigerd')
tekst = msgbox ("All Your Base Are Belong aan ons", 16, 'Toegang geweigerd')
tekst = msgbox ('Please wait while het virus wordt herhaaldelijk gekloond', 16, "klonen Virus")
WshShell.run "message.bat"
WshShell.run "batchfile.bat"
doen
tekst = msgbox ("En ik win!", 16 "u Lose")
lus
--------------------------------------------------------
virus.bat:
uitschakelen
titel All Your Base zijn behoren To Us
kleur 0a
CD...
CD...
CD...
: 1
dir/s
goto 1
--------------------------------------------------------
Message.bat:
echo off
titel groeten, slachtoffer
kleur 04
doen
ECHO u hebben A-Virus
ping localhost -n.5 > nul
lus
pauze
-------------------------------------------------------
batchfile.bat:
Start batchfile.bat
-------------------------------------------------------
Opmerking: Dit is de een die ik heb je gewaarschuwd over, start batchfile.bat in batchfile.bat. Alleen dit worden uitgevoerd als u weet wat u doet! BTW, cd... in de virus.bat stijgt bestand in een directory-pad in cmd, wat betekent dat u uw reikwijdte verruimen. Dit zal automatisch herhaald door alle bestanden en mappen op uw computer. Heel vervelend, maar het kan geen kwaad om het even wat. En vergeet niet dat dit zijn alle afzonderlijke bestanden in dezelfde map. Ook, is het eerste wat deze prank-virus doet ghost type "All your base are belong to us", zelfs met een typfout en sommige backspaces te corrigeren, waardoor het meer geloofwaardig dat je slachtoffer is gehackt. Het heeft ook variabele tarieven te typen, zoals aangegeven door de verschillende waarden voor slaap.
Voorbeeld 2:
prank2.vbs:
set wshshell = wscript. CreateObject("wscript.shell")
MsgBox "Don't"
MsgBox "U"
MsgBox "Hate"
MsgBox "It"
MsgBox "Wanneer"
MsgBox "Dit"
MsgBox "Gebeurt?"
WshShell.run "test.vbs"
----------------------------------------------------
test.vbs:
strSoundFile = "C:\fakevirusprank2\magicwrd.wav"
Set objShell = CreateObject("Wscript.Shell")
tekst = msgbox ("Wilt u een pup?", 52, "Gratis Puppy")
doen
strCommand = "sndrec32 versneld" & chr(34) & strSoundFile & chr(34)
objShell.Run strCommand, 0, False
Wscript.Sleep 500
tekst = msgbox ("U niet zeggen dat het magische woord", 16 "U doen niet krijgen A Puppy")
lus
--------------------------------------------------
Opmerking: De map van de eerste lijn van test.vbs is waar uw geluidsbestand is. Mijn geluidsbestand is de Jurassic Park "Uhn uhn uhn, je vergat te zeggen dat het magische woord", en het loops, dus het is echt grappig en vervelend. Het eerste deel wordt een verschillende berichtvenster weergegeven telkens wanneer zij tikken OKEE of sluit het venster, vervolgens wordt het tweede bestand uitgevoerd. Het tweede bestand vraagt het slachtoffer dat als ze een puppy willen, maakt niet uit wat ze, ja, Nee klikken, of sluiten, ze krijgen de Jurassic Park wave audio-bestand en een bijbehorende foutbericht.
Oke, om te schakelen van het ene, houd ongetwijfeld de meer gevaarlijke van de twee, eerst ctrl + c juiste nadat de cmd windows beginnen vullen het scherm. Vertraging en u mogelijk te laat op sommige oudere computers. Zodra deze gestopt. Sluit alle vensters van de cmd individueel en vervolgens toegankelijk taak zetbaas. U moet het proces genaamd "wscript.exe" beëindigen die ik eerder noemde. Sluit om het even wat anders nog open, en u hoeft niet te Sla het tekstbestand ;)
Om te schakelen naar de tweede men, uitsluitend toegankelijk taak zetbaas en einde wscript.exe. Sluit alles wat open. Fluitje van een cent.