0 / 0 / 0
Регистрация: 12.10.2012
Сообщений: 82
1

Привязка к мак адресу компьютера

29.11.2012, 16:04. Показов 972. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем доброго времени суток дорогие форумчани!
Вот у меня есть код что бы узнать мак адерс компьютера
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
function GetAdapterInfo(Lana: Char): String;   
var   
Adapter: TAdapterStatus;   
NCB: TNCB; 
begin   
FillChar(NCB, SizeOf(NCB), 0);   
NCB.ncb_command := Char(NCBRESET);   
NCB.ncb_lana_num := Lana;   
if Netbios(@NCB) <> Char(NRC_GOODRET) then   
begin   
Result := 'mac not found';   
Exit;   
end;   
 
FillChar(NCB, SizeOf(NCB), 0);   
NCB.ncb_command := Char(NCBASTAT);   
NCB.ncb_lana_num := Lana;   
NCB.ncb_callname := '*';   
 
FillChar(Adapter, SizeOf(Adapter), 0);   
NCB.ncb_buffer := @Adapter;   
NCB.ncb_length := SizeOf(Adapter);   
if Netbios(@NCB) <> Char(NRC_GOODRET) then   
begin   
Result := 'mac not found';   
Exit;   
end;   
Result :=   
IntToHex(Byte(Adapter.adapter_address[0]), 2) + '-' +   
IntToHex(Byte(Adapter.adapter_address[1]), 2) + '-' +   
IntToHex(Byte(Adapter.adapter_address[2]), 2) + '-' +   
IntToHex(Byte(Adapter.adapter_address[3]), 2) + '-' +   
IntToHex(Byte(Adapter.adapter_address[4]), 2) + '-' +   
IntToHex(Byte(Adapter.adapter_address[5]), 2);   
end;   
 
function GetMACAddress: string; 
var   
AdapterList: TLanaEnum;   
NCB: TNCB; 
begin   
FillChar(NCB, SizeOf(NCB), 0);   
NCB.ncb_command := Char(NCBENUM);   
NCB.ncb_buffer := @AdapterList;   
NCB.ncb_length := SizeOf(AdapterList);   
Netbios(@NCB);   
if Byte(AdapterList.length) > 0 then   
Result := GetAdapterInfo(AdapterList.lana[0])   
else   
Result := 'mac not found'; 
end;
Можете мне написать пример функции пкривязки к нему!
Допустим есть текстовый файл. В нем храняться мак адереса!
Нужно что бы при нажатие на кнопку сканировался мак адерс компютера (моим скриптом)
После чего программа смотрела в текстовый файл есть ли такой мак адерс в нем!
Если есть тогда выдавала сообщение (Все ок)
Если нет тогда выдавала сообщение (Ошибка)
Заранее большое спасибо!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.11.2012, 16:04
Ответы с готовыми решениями:

роутер тплинк и привязка к мак адресу
В общем есть роутер тплинк TL-WDR4300 На нем доступ к админке был прописан только по мак адресу......

Удаленное управление Cisco Catalyst по мак адресу
Всем доброго времени суток. Можно ли с одной cisco switch удаленно заходить на другую по мак...

Привязка мак-адреса к ip cisco 1841
имеестся 1841 который раздаёт инет, гдето 20-30 пользователей.... каждому айпи соответствует...

настройка фильтрации по мак адресу (d-link dir-615 k2)
Подскажите кто знает, возможно ли это сделать и если да то как? Есть роутер dir-615 k2, к нему...

3
2664 / 2270 / 279
Регистрация: 24.12.2010
Сообщений: 13,723
29.11.2012, 16:24 2
Цитата Сообщение от RPG-MARKET Посмотреть сообщение
мак адерс компьютера
У компьютера нет "мак адерса".
Он есть у ethernet- интерфейса.
Таких в системе может быть много.
А ты почему-то рассматривапешь только самый первый в списке.
0
0 / 0 / 0
Регистрация: 12.10.2012
Сообщений: 82
29.11.2012, 18:30  [ТС] 3
mss, не хочу вас оскорблять но не могли бы вы больше не давать ответов в моей теме! т.к. вы по суте ничего не пишете только развиваете во мне комплекс неполноценности! Сколько я не создавал тем вы не разу не дали конструктивного ответа! попрошу больше не отвечать на мои темы и посты спасибо!
0
0 / 0 / 0
Регистрация: 12.10.2012
Сообщений: 82
01.12.2012, 03:43  [ТС] 4
Помогите пожайлуста в решение проблеммы!
0
01.12.2012, 03:43
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.12.2012, 03:43
Помогаю со студенческими работами здесь

Привязка МАК-адреса к VLAN QTECH QSW-2700
возможно ли привязать определённый мак адрес к определённому VLAN? например к L2 комутатору на 1-ый...

Привязка субъектов к адресу
Добрый день! Помогите разобраться, бьюсь 4 месяца, ума не приложу, не так силен в этой сфере. Есть...

UDP: Привязка сокета к адресу
Хотел привязать сокет к адресу сервера, но выдает ошибку (-200). Функция запускается в отдельном...

Привязаный мак-адрес и 2 компьютера
Всем привет! Перейду сразу к теме: Провайдер подключил интернет, выделив один мак-адрес. Но...

Привязка переменной в ОЗУ к определенному адресу
GCC ARM надо при инициализации переменную в ОЗУ привязать к определенному адресу, чтобы иметь...

IP зарезервирован по мак-адресу, но при загрузке под другой системой карта получает другой IP по DHCP
Есть ноутбук lenovo e540 с двумя ОС на борту. По работе для выполнения различных задач требуется...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru