Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как изменить/эмулировать мак адрес компа 
V
    Опции темы
Rohoss
Дата 29.6.2008, 17:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Начальник интернета
***


Профиль
Группа: Завсегдатай
Сообщений: 1308
Регистрация: 9.10.2006
Где: Matrix

Репутация: нет
Всего: 18
Собственно сабж.  Известно, что сетевая плата одна. В сети много примеров как узнать, но как изменить не нашёл…


--------------------
Файловый менеджер Explorer.Net скачать  video
PM ICQ   Вверх
Qu1nt
Дата 29.6.2008, 18:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 602
Регистрация: 13.1.2007

Репутация: 2
Всего: 50
Цитата(Google)

1) Зайдите в систему как Администратор.
2) Откройте Пуск-> Панель управления. Откройте "Сетевые подключения". Выделите нужный сетевой интерфейс, зайдите в его Свойства (правым кликом).
3) Сейчас Вы видите, какому устройству соответствует данный сетевой интерфейс.
4) Запускаем regedit: "Пуск-> Выполнить->regedt32". Обратите внимание: не "Regedit".
5) Открываем раздел "HKLM\SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002BE10318}"
6) Ищем наш подраздел. Подразделы описывают сетевые интерфейсы всех имеющихся сетевых адаптеров и отображаются в виде 4-х значных чисел 0000, 0001, 0002 и т.д. Не уходите в подключи Linkage и Ndi. По ключу 000x\"DriverDesc" находим нужный нам интерфейс. Он будет содержать имя сетевой карты.
7) Изменяем (добавляем, если нужно, тип данных - REG_SZ) ключ "NetworkAddress".  Вводим новый адрес.
8) Не трогайте DriverDateData.
9) Отключаем, затем включаем сетевой интерфейс в окне "Сетевые подключения". 
10) Желательна перезагрузка.

Чревато все это)
PM MAIL   Вверх
Rohoss
Дата 29.6.2008, 18:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Начальник интернета
***


Профиль
Группа: Завсегдатай
Сообщений: 1308
Регистрация: 9.10.2006
Где: Matrix

Репутация: нет
Всего: 18
Уже разобрался.
Можно симулировать. Для этого  в реестре в HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002bE10318}\0001 создаём строковой параметр с именем  NetworkAddress и нашим новым маком.  smile 
Вот код
Код

procedure SenMacAdress(sNewMac:string);
var
reg:TRegistry;
begin
reg:=TRegistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002bE10318}\0001',false);
reg.WriteString('NetworkAddress',sNewMac);
reg.CloseKey;
reg.Free;
end;

После этого нужно отключится от сети и опять подключится. Знать бы ещё как это сделать…  smile

Добавлено @ 18:17
Qu1nt спасибо, ну уже нашёл

Это сообщение отредактировал(а) Rohoss - 29.6.2008, 18:20


--------------------
Файловый менеджер Explorer.Net скачать  video
PM ICQ   Вверх
Qu1nt
Дата 29.6.2008, 18:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 602
Регистрация: 13.1.2007

Репутация: 2
Всего: 50
Я бы изменил твою функцию как-нибудь так:
Код

procedure SetMacAdress(const NewMac: string; DeviceNum: Integer = 1);
begin
  with TRegistry.Create do
  begin
    RootKey := HKEY_LOCAL_MACHINE;
    OpenKey('SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002bE10318}\000' + IntToStr(DeviceNum), False);
    WriteString('NetworkAddress', NewMac);
    Free;
  end;
end;

Цитата(Rohoss @  29.6.2008,  18:15 Найти цитируемый пост)

После этого нужно отключится от сети и опять подключится. Знать бы ещё как это сделать… 

Скачиваем эту консольную утилитку.
Отключаем:
Код

CNic n:0 -d

Включаем:
Код

CNic n:0 -c
PM MAIL   Вверх
Rohoss
Дата 29.6.2008, 19:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Начальник интернета
***


Профиль
Группа: Завсегдатай
Сообщений: 1308
Регистрация: 9.10.2006
Где: Matrix

Репутация: нет
Всего: 18
Qu1nt, супер!!! Большое спасибо!!!


--------------------
Файловый менеджер Explorer.Net скачать  video
PM ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0441 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.