Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Googler


Сообщения: 3665
Благодарности: 1563

Профиль | Отправить PM | Цитировать


Цитата Maza Faka:
Для получения IP-адреса используй макро @IPAddress1 или @IPAddress2, а ещё лучше брать его из реестра. Для получения MAC-адреса используй утилиту getmac.exe »
ИМХО лучше без вызова внешних прог - через WMI:
Код: Выделить весь код
#include <array.au3>

$a = _NetAdapterGetProp()
_ArrayDisplay($a)

Func _NetAdapterGetProp($sHostName = "localhost")
    Local $objItem, $objWMIService = ObjGet( "winmgmts:\\"& $sHostName &"\root\CIMV2")
    Local $sQuery = 'SELECT Index, Caption, MACAddress, IPAddress FROM Win32_NetworkAdapterConfiguration Where IPEnabled = True'
    Local $colItems = $objWMIService.ExecQuery($sQuery, "WQL", 0x30)
    If IsObj($colItems) Then
        Local $aRes[1][3], $i=0
        For $colItem In $colItems
            ReDim $aRes[$i+1][3]
            $aRes[$i][0] = $colItem.Caption
            $aRes[$i][1] = $colItem.IPAddress(0)
            $aRes[$i][2] = $colItem.MACAddress
            $i+=1
        Next
        Return $aRes
    EndIf
    Return SetError(1)
EndFunc  ;==> _NetAdapterGetProp
Это сообщение посчитали полезным следующие участники:

Отправлено: 11:59, 30-01-2008 | #69