[..] Requête ping plus rapide

[Zippo]

Salut,

J'aimerais faire une requête de ping plus rapide que l'original c'est à dire : ping(). Je voudrais simplement savoir si l'IP est online ou offline.

[matwachich]

Regardez la doc de la fonction Ping

Code : Tout sélectionner

[i]timeout [optional][/i] - Is the time to wait for an answer in milliseconds (default is 4000).

[Zippo]

Je fais ping($ip,1) mais sa va pas plus vite.

[ani]

une milliseconde :p

y a un tableau pour le cas ou → @error

Code : Tout sélectionner

Dim $iTemp = "0", $sLink = "www.autoitscript.com"
Dim $Ping, $statut = ''

$Ping = Ping($sLink,$iTemp)

Switch @error

    case 0
        $statut = "Host is Online"
    case 1
        $statut = "Host is offline"
    case 2
        $statut = "Host is unreachable"
    case 3
        $statut = "Bad destination"
    case 4
        $statut = "Other errors"
        
EndSwitch

ConsoleWrite($ping & " - " &$statut)

[mikell]

Zippo c'est une bonne question dont j'aimerais bien connaitre la réponse...
Et savoir pourquoi ce script est si long ^^

Code : Tout sélectionner

$begin = TimerInit()
$ping = Ping("www.mikell.argh", 100)   ; <= offline (a priori...)
If @error Then
  $time = Round(TimerDiff($begin)/1000)
  Msgbox(48,"", "  Pas connecté    " & $time & "  secondes")
EndIf

Si le 100 est un time-out de fin de requête, pourquoi le script met-il (chez moi) 17 secondes ?