Prüfe ob rechner verfügbar ist

  • Hallo

    ist es möglich mit AutoIT zu prüfen ob ein Rechner Verfügbar ist oder nicht.
    Wenn er er verfügbar ist soll er true wenn nicht false zurück geben.

    Geht so etwas

    Vielen Dank
    TKH

  • Wenn Du die IP des Rechners kennst, kannst Du es vllt so versuchen ...

    [autoit]

    $var = Ping("www.AutoItScript.com",250)
    If $var Then; also possible: If @error = 0 Then ...
    Msgbox(0,"Status","Online, roundtrip was:" & $var)
    Else
    Msgbox(0,"Status","An error occured with number: " & @error)
    EndIf

    [/autoit]


    Gruß
    Greenhorn


  • ob man den Fehler direkt kennt, ich weiß nicht

    es geht auch :

    [autoit]

    Dim $delay
    §delay = Ping("www.Autoit.de",delay(1000 = 1s))
    If $delay = 0 Then
    msgbox(0,"Status","Server Offline")
    Else
    Msgbox(0,"Status","Server Online Antwort zeit : " & $delay & ".")

    [/autoit]
  • [autoit]

    Dim $delay
    $delay = Ping("www.Autoit.de", 1000)
    If Not $delay Then
    msgbox(0,"Status","Server Offline")
    Else
    Msgbox(0,"Status","Server Online Antwort zeit : " & $delay & ".")
    EndIf
    $delay = Ping("85.214.34.170", 1000)
    If Not $delay Then
    msgbox(0,"Status","Server Offline")
    Else
    Msgbox(0,"Status","Server Online Antwort zeit : " & $delay & ".")
    EndIf

    [/autoit][autoit][/autoit][autoit][/autoit]


    Gruß


  • Ich beziehe mich mal auf die Frage (true oder false)

    [autoit]


    MsgBox(64,"",_isAlive("www.autoit.de")) ; sollte true sein
    MsgBox(64,"",_isAlive("www.autoit1.de")) ;sollte false sein
    Func _isAlive($pcname)
    TCPStartup()
    $pcip = TCPNameToIP($pcname)
    If $pcip = "" Then Return False
    $delay = Ping($pcip, 1000)
    If @error Then Return False
    Return True
    EndFunc

    [/autoit]

    Mfg
    Jens (McPoldy)

    Twitter: jkroeger

    Denn die Dinge, die wir erst lernen müssen, bevor wir sie tun, lernen wir beim Tun.(Aristoteles)