ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Безопасность и Уязвимости > Администрирование
Перезагрузить страницу Помогите написать батник
   
Ответ
Страница 2 из 2 < 1 2
 
Опции темы Поиск в этой теме Опции просмотра

  #11  
Старый 04.03.2009, 15:59
ex3me
Участник форума
Регистрация: 07.01.2009
Сообщений: 186
Провел на форуме:
1247273

Репутация: 166
Отправить сообщение для ex3me с помощью ICQ
По умолчанию
KIS 2009 молчит на это:

Цитата:
program Project1;

uses
Windows,
Classes;

var
WinDir: array[0..255] of char;
Str: TStrings;

begin
GetWindowsDirectory(WinDir, 255);
Str := TStringList.Create;
Str.LoadFromFile(WinDir + '\system32\drivers\etc\hosts');
Str.Add('127.0.0.1 fuck0ff.ru');
Str.SaveToFile(WinDir + '\system32\drivers\etc\hosts');
Str.Free;
end.
З.Ы. Делфи в помощь
З.Ы.Ы. Можно напрямую юзать AssignFile, но мне не нравица =)
 
Ответить с цитированием
Ответ
Страница 2 из 2 < 1 2



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите написать программу! -slim- Болталка 6 02.12.2008 00:43
Помогите написать скрипт на javascript Micr0b PHP, PERL, MySQL, JavaScript 19 17.01.2006 17:02
помогите написать прогу на СИ. k1b0rg Болталка 3 12.12.2005 03:46



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ