↑  ←  Описание функции


_TCPIpToName

Возвращает имя хоста указанного IP адреса

#include <Inet.au3>
_TCPIpToName($sIp [, $iOption = 0 [, $hDll_Ws2_32 = "Ws2_32.dll"]])

Параметры

$sIp IP адрес в формате IPv4
$iOption [необязательный] Default = 0
0 = Возвращает строку имени хоста
1 = Возвращает массив (смотрите примечание)
$hDll_Ws2_32 [необязательный] Дескриптор библиотеки Ws2_32.dll

Возвращаемое значение

Успех:Возвращает имя хоста или массив (смотрите примечание)
Ошибка:Возвращает "" пустую строку
@error:0 = нет ошибок.
1 = inet_addr DllCall неудачно
2 = inet_addr неудачно
3 = gethostbyaddr DllCall неудачно
4 = gethostbyaddr неудачно, WSAGetLastError = @extended
5 = gethostbyaddr и WSAGetLastError неудачно
6 = strlen/sZStringRead неудачно
7 = Ошибка чтения массива псевдонимов

Примечания

Требуется WSAStartup (делается функцией TCPStartup).
Если $iOption = 1, то возвращается массив следующего формата:
    $aResult[0] = Количество элементов массива
    $aResult[1] = "Имя хоста"
    $aResult[2] = "Псевдоним 1"
    $aResult[3] = "Псевдоним 2"
    ...

См. также

TCPStartup, TCPNameToIP

Пример

#include <Array.au3>
#include <Inet.au3>

Global $aResult, $sResult, $sIP

; Пример 1

TCPStartup()
$sIP = TCPNameToIP("hiddensoft.com")
$sResult = _TCPIpToName($sIP)
If @error Then
    MsgBox(0, "_TCPIpToName()", "@error = " & @error & @LF & "@extended = " & @extended)
Else
    MsgBox(0, "hiddensoft.com реально это:", $sResult)
EndIf

; Пример 2

TCPStartup()
$sIP = _GetIP()
$aResult = _TCPIpToName($sIP, 1)
If @error Then
    MsgBox(0, "_TCPIpToName()", "@error = " & @error & @LF & "@extended = " & @extended)
Else
    _ArrayDisplay($aResult, "Local Hostname(s)")
EndIf