Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Программная инженерия > Компьютерное железо
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.10.2010, 21:59   #1
ahvahsky2008
Пользователь
 
Регистрация: 09.03.2010
Сообщений: 31
Счастье autorun.inf

задолбали вирусы поэтому хотел бы спросить
1)как создать на флешке папку autorun.inf с параметрами скрытый,системный и внутри оного создать папку aux(con,lpt1)
ahvahsky2008 вне форума Ответить с цитированием
Старый 25.10.2010, 22:07   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

А причем тут "Общие вопросы Delphi" ?
Расцениваю как флуд и переношу в "Железо".
mihali4 вне форума Ответить с цитированием
Старый 25.10.2010, 22:15   #3
ahvahsky2008
Пользователь
 
Регистрация: 09.03.2010
Сообщений: 31
По умолчанию

Цитата:
Сообщение от mihali4 Посмотреть сообщение
А причем тут "Общие вопросы Delphi" ?
Расцениваю как флуд и переношу в "Железо".

Ну процедуру надо на дельфи сделать же.. Поэтому там и разместил
ahvahsky2008 вне форума Ответить с цитированием
Старый 25.10.2010, 22:33   #4
Goodwin98
equ asm
Участник клуба
 
Аватар для Goodwin98
 
Регистрация: 02.05.2009
Сообщений: 1,605
По умолчанию

Цитата:
Расцениваю как флуд и переношу в "Железо".
А железо тогда тут при чем ? о_О Уж лучше в обсуждение программ тогда наверно

А если по теме, то просто создавайте файл как обычно, но с путем вида
\\?\\d:\autorun.inf\con
Какой вопрос - такой ответ. Не забываем пользоваться поиском, гуглом.
Помощь в выполнении работ по ассемблеру ICQ:2725322O4

Последний раз редактировалось Goodwin98; 25.10.2010 в 22:36.
Goodwin98 вне форума Ответить с цитированием
Старый 25.10.2010, 22:59   #5
DomiNick
Студент, не
Старожил
 
Аватар для DomiNick
 
Регистрация: 29.01.2009
Сообщений: 2,067
По умолчанию

Тогда уж в "Безопасность" чтоль.....
А от таких вирусов ничто не спасёт...
I am the First of Cyber Evolution...
I am the First to Program your Future...
DomiNick вне форума Ответить с цитированием
Старый 25.10.2010, 23:19   #6
Gambler
Игрок
Форумчанин
 
Аватар для Gambler
 
Регистрация: 29.10.2006
Сообщений: 367
По умолчанию

автозапуск выключи и спи спокойно.
Жизнь всегда игра. Но смерть - не всегда поражение.

#define true (Math.random()>0.5) //Удачной отладки
Gambler вне форума Ответить с цитированием
Старый 26.10.2010, 13:38   #7
JTG
я получил эту роль
Старожил
 
Аватар для JTG
 
Регистрация: 25.05.2007
Сообщений: 3,694
По умолчанию

Пиарюсь
пыщь
JTG вне форума Ответить с цитированием
Старый 26.10.2010, 20:54   #8
DomiNick
Студент, не
Старожил
 
Аватар для DomiNick
 
Регистрация: 29.01.2009
Сообщений: 2,067
По умолчанию

Я пробовал вообще все способы... От большинства вирусов - да, поможет...
Но я встречал совсем зверские версии которые прошибают что угодно...
Цитата:
автозапуск выключи и спи спокойно.
Смысл думаю в том чтоб не подхватить вирусов на чужих компах...
I am the First of Cyber Evolution...
I am the First to Program your Future...
DomiNick вне форума Ответить с цитированием
Старый 26.10.2010, 21:23   #9
dmitriegorovih
Ещё не
Форумчанин
 
Аватар для dmitriegorovih
 
Регистрация: 04.01.2010
Сообщений: 517
По умолчанию

а что если добавить по вот этой ветке
HKEY_LOCAL_MACHINE\SOFTWARE\Microso ft\Windows NT\CurrentVersion\IniFileMapping\Au torun.inf

присвоить значение @SYS:DoesNotExist

а в делфи будет выглядить вот так
Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,Registry, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
reg: TRegistry;
begin
 reg := TRegistry.Create;
    reg.RootKey := HKEY_LOCAL_MACHINE;
    reg.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\IniFileMapping',
      true);
    reg.WriteString('Autorun.inf','@SYS:DoesNotExist');
    reg.CloseKey;
    reg.free;
end;

end.
Воображение важнее, чем знания. (Albert Einstein)
dmitriegorovih вне форума Ответить с цитированием
Старый 26.10.2010, 21:55   #10
Gambler
Игрок
Форумчанин
 
Аватар для Gambler
 
Регистрация: 29.10.2006
Сообщений: 367
По умолчанию

ну пусть распространяет бедные вирусы. Главное что сам не заразится. )))
Жизнь всегда игра. Но смерть - не всегда поражение.

#define true (Math.random()>0.5) //Удачной отладки
Gambler вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание autorun.inf файла god110 Общие вопросы Delphi 14 11.02.2010 15:02
autorun.inf Яр|/||< (^_^) Windows 1 23.08.2009 10:29
Autorun.inf Lime Безопасность, Шифрование 14 14.03.2009 21:51
+INF timehascome Общие вопросы Delphi 8 19.10.2008 21:43
autorun.inf 4444 Помощь студентам 20 15.04.2008 21:03