WeLcoMe GenIuS
GenIus.3xforum.ro Rapidshare Forum , Rapidshare Free Download , Rapidshare Movies , Rapidshare Games , Rapidshare Applications, tutoriale hack, filme noi 2009, jocuri free, jocuri full, programe free, yahoo password, yahoo flood, ddos kill, poze, wallpere, invitati torent, filme gratis, filme noi, seriale, seriale noi, videoclipuri, muzica free, manele, hip-hop, rock, totul free.
|
Nou pe simpatie:
lonely_32 pe Simpatie.ro
 | Femeie
24 ani
Valcea
cauta Barbat
26 - 57 ani |
|
|
WeLcoMe GenIuSInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
 A!3xAdministratorDin: Iasi
Postari: 199
|
|
scrii in notepad :
msgbox "Sa te vad daca shtii sa ma rogi frumos sa itzi las compul in pace"
Set kader = WScript.CreateObject("SAPI.SpVoice"
kader.Speak "computer infected"
msgbox"O sa itzi deschid primele 10 porturi...apoi o sa itzi dezactivez firewallul..shi ma mai gandesc",,"Nuca"
msgbox"Gata,te-ai ars!!!",,"Nuca"
kader.Speak "1, 2, 3"
kader.Speak "opening port number 1 "
kader.Speak "opening port number 2"
kader.Speak "opening port number 3"
kader.Speak "opening port number 4"
kader.Speak "opening port number 5"
kader.Speak "opening port number 6"
kader.Speak "opening port number 7"
kader.Speak "opening port number 8"
kader.Speak "opening port number 9"
kader.Speak "opening port number 10"
kader.Speak "all 10 sistem ports are opened"
msgbox"In momentul de fatza ai la comp cela mai importante 10 de porturi deschise",,"Nuca"
msgbox "Acum itzi dezactivez protectzia compului",,"Nuca"
kader.Speak "starting proces"
kader.speak " "
kader.Speak "disabling antivirus"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak " "
kader.speak "antivirus disabled"
kader.speak " "
kader.Speak "disabling firewall"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak "firewall disabled"
kader.speak "operation completed"
msgbox" Incepe infectarea compului gazda",,
kader.Speak "Extracting viruses"
kader.Speak "extracting Trad3r.trojan"
kader.Speak " "
kader.Speak "loading"
kader.Speak "Trad3r.trojan has been succesfull extracted"
msgbox" Ce sa itzi fac , daca ai suparat pe cine nu trebuia "
kader.Speak "anyway your personal computer will be functionable only 10 more seconds"
kader.Speak "say bye to your pc"
kader.Speak "10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0"
kader.Speak "shutdown and saving infected"
kader.Speak " MADE BY Santinel"
Dim wshshell
set wshshell = wscript.Createobject("WScript.Shell"
wshshell.run "shutdown -s -t 30 -c Mas"
shi salvezi .vbs
_______________________________________
Pe ToN RR-iT :P
|
|
| |
|
