UDF > Inet >

_TCPIpToName

R�sout l'adresse IP du nom d'h�te(s)

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

Param�tres

$sIP	Adresse IP au format v4
$iOption	[optionnel] Par d�faut = 0 0 = pour retourner la cha�ne HostName 1 = pour retourner un tableau (voir Remarque)
$hDll	[optionnel] Handle de Ws2_32.DLL

Valeur de retour

Succ�s:	Retourne le nom d'h�te ou un tableau (voir Remarque)
�chec:	Retourne ""
@error:	1 - inet_addr DllCall a �chou� 2 - inet_addr a �chou� 3 - gethostbyaddr DllCall a �chou� 4 - gethostbyaddr a �chou�, WSAGetLastError = @extended 5 - gethostbyaddr a �chou�, WSAGetLastError a �chou� 6 - strlen/sZStringRead a �chou� 7 - Erreur de lecture Aliases Array

Remarque

Un WSAStartup r�ussi (Fait par TCPStartup()) est n�cessaire.
Si $iOption = 1, le tableau retourn� ressemble � ceci:
    $aResult[0] = Nombre d'�l�ments
    $aResult[1] = "HostName"
    $aResult[2] = "Alias 1"
    $aResult[3] ="Alias 2"
    ...

Exemples

Exemple 1

#include <Inet.au3>
#include <MsgBoxConstants.au3>

Local $aResult, $sResult, $sIP

TCPStartup()
$sIP = TCPNameToIP("autoitscript.com")
$sResult = _TCPIpToName($sIP)
If @error Then
    MsgBox($MB_SYSTEMMODAL, "_TCPIpToName()", "@error = " & @error & @CRLF & "@extended = " & @extended)
Else
    MsgBox($MB_SYSTEMMODAL, "autoitscript.com really is:", $sResult)
EndIf

Exemple 2

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

Local $aResult, $sResult, $sIP

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