[R] Trouvé l'adresse IP d'un site a partir de son URL

[Utilisateur 3643 supprimé]

Bonjour !
je me demandais tout simplement si il existait comme sur la console une sorte de commande ping pour trouvé directement l'IP du site voulu.

[PandiPanda]

Bonsoir,

ceci peut etre ?

Code : Tout sélectionner

#include <IE.au3>

TCPStartup()

$IpGoogle=TCPNameToIP("www.google.fr")
_IECreate($IpGoogle)
TCPShutdown()

[Utilisateur 3643 supprimé]

Oui merci

[TT22]

Est-ce que ceci te convient :

► Afficher le texte

Code : Tout sélectionner

#include <String.au3>
#include <Process.au3>

$Site = InputBox("Info","Entrez le site dont vous souhaitez obtenir l'IP :")

MsgBox(64,"Info",_GetSitesIP($Site))

Func _GetSitesIP($Site)
    FileDelete(@TempDir&"\IP_Ping_get.tmp")
    _RunDOS("ping -n 1 "&$Site&" > "&@TempDir&"\IP_Ping_get.tmp")
    $IP = _StringBetween(FileRead(@TempDir&"\IP_Ping_get.tmp"),"[","]")
    FileDelete(@TempDir&"\IP_Ping_get.tmp")
    
    If UBound($IP) Then
        Return $IP[0]
    Else
        Return 0
    EndIf
EndFunc

Edit : Le temps que j'écrive mon code, le sujet a été résolu

[mikell]

Code : Tout sélectionner

#include <Constants.au3>
$url = "www.autoitscript.fr"

Local $foo = Run(@ComSpec & " /c nslookup " & $url, @SystemDir, @SW_HIDE, $STDERR_CHILD+ $STDOUT_CHILD)
Local $line

While 1
    $line &= StdoutRead($foo)
    If @error Then ExitLoop
Wend
MsgBox(0, "STDOUT read:", $line)