Имя: Пароль:
1C
 
Как средствами 1С получить MAC адрес сетевухи
0 igor13
 
07.03.08
12:14
Через Пуск->Выполнить->CMD->ipconfig /all я вижу Физический адрес сетевой карты. Вопрос: как получить его по средством 1С???
Заранее спасибо!
1 Salvador Limones
 
07.03.08
12:15
Через WMI
2 Кураж
 
07.03.08
12:17
(0) WMI. Класс Win32_NetworkAdapter
3 igor13
 
07.03.08
12:17
Спасибо, сча покапаю.
4 simol
 
07.03.08
12:32
(1,2) А пример можно?
5 Кураж
 
07.03.08
12:38
(4) А Яндекс если спросить?...
6 BAGER
 
07.03.08
12:48
// Определение MAC и IP адресов

   MACAddress = "";
   ServicesSet = ПолучитьCOMОбъект("winmgmts:{impersonationLevel=impersonate}!\\" + ИмяКомпьютера + "\root\cimv2");
   Items = ServicesSet.ExecQuery("Select * From Win32_NetworkAdapter");
   Для каждого Item Из Items Цикл
       MACAddress = Item.MACAddress;
   КонецЦикла;
   
   Если MACAddress <> "" Тогда
       Сообщить("MAC адрес: " + MACAddress);
       
       Items = ServicesSet.ExecQuery("Select * From Win32_NetworkAdapterConfiguration");
       Для каждого Item Из Items Цикл
           Если Item.MACAddress = MACAddress Тогда
               Для каждого IPAddress Из Item.IPAddress Цикл
                   Сообщить("IP адрес: " + IPAddress);
               КонецЦикла;
           КонецЕсли;
       КонецЦикла;
   КонецЕсли;
7 dk
 
07.03.08
12:49
КомандаСистемы("ipconfig /all >>c:\log.txt");
и парсь потом этот файл, хотя конечно не очень красиво :)
8 Кураж
 
07.03.08
12:59
(7) для извращенцев могу предложить напрямую, без записи файлов, читать StdOut этой команды, тогда будет немного красивее...
9 ne6o
 
07.03.08
14:22
Как узнать программно имя компа на котором будет вызывается этот код?
Чтобы
\" + ИмяКомпьютера + "\
не прописывать руками каждый раз.
Для чего можно использовать?
10 Garlic
 
07.03.08
14:24
(0) Нетленку ваяем с привязкой к сабжу?
11 undertaker
 
07.03.08
14:29
(9) ИмяКомпьютера как раз это и делает
12 Salvador Limones
 
07.03.08
14:29
(9) СП спёрли?
13 ne6o
 
07.03.08
14:30
В 8.1 ИмяКомпьютера - переменная неопределена :(
14 ne6o
 
07.03.08
14:31
Тихо! :)
Сейчас понесётся :)
втыкнул
15 ne6o
 
07.03.08
14:34
классная вещь!
Для какой цели можно использовать?
16 Salvador Limones
 
07.03.08
14:39
(15) Хммм... Применений много, глянь: v8: v8: Бесполезности для XP (WMI, WSH), перец какой-то писал.
17 undertaker
 
07.03.08
14:44
(13)
Глобальный контекст
ИмяКомпьютера (ComputerName)
Синтаксис:
ИмяКомпьютера()
Возвращаемое значение:
Тип: Строка. Сетевое имя компьютера.
Описание:
Получает сетевое имя компьютера.
Пример:
СетевоеИмяКомпьютера = ИмяКомпьютера();
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.