Santinel MEMBRU SPECIAL Din: ¤•€†H€®Ñ-£Ø®Ð§•][-][ackerz++
Postari: 392
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"
dar de unde formatul asta vbs ca eu nu am asa ceva la notpad am ansi unicode si alte 2 balarii in nici un caz vbs asta poate ma ajuti si pe mine plzz
Dupa ce ai scris in Notepad cele de mai sus click File -> Save as...-> pui orice nume (De ex. Calvarul) pui punct si scrii vbs -> Save Deci scrii Calvarul.vbs -> Save
P.S. Cel caruia ii trimiti acest fisier trebuie sa fie tare prost ca sa-l deschida
cred ca am gresit undeva uite imi da eroarea asta http://img169.imageshack.us/my.php?imag ... 718hq4.png cred ca o so las balta nu o sa am cum sa invat ceea ce u sti si probabil ai si o varsta inaintata atat ca persoana cat si in domeniul acesta . oricum ms mult ca ai incercat sa ma ajuti dar ca incepator trebuie sa stau sa privesc pe un pc ceea ce u ne descrii . Inca o data ms