(W)LAN Watch Dog

Hallo,
ich bekomme bei diesem Script auch eine Fehlermeldung. Kann da Jemand drüber schauen, ich konnte so keinen Fehler finden. :banghead:

<?

// (C) by IP-Symcon 2009
// Trigger: z.B. alle 5 Minuten

foreach(IPS_GetChildrenIDs($_IPS['SELF']) as $item){   // alle Unterobjekte
    $id_info = IPS_GetObject($item);
    //print_r ($id_info);
    $id_typ = $id_info['ObjectType'];
     $id_object = $id_info['ObjectID'];
     $object_state = @GetValue($id_object);
     //print_r ($object_state);
    if ($id_typ == 2){                                      // nur bei Variablen
        $id_adr = $id_info['ObjectInfo'];
        $ping = Sys_Ping($id_adr, 200);             // Ping max. 2 Sek. warten
        if($_IPS['SENDER'] == "Execute") {                     // zum Testen
            echo "IP: $id_adr 
";
            echo "Ping: " .(int)$ping. "

";
        }
        if($ping!=$object_state)
        {
         SetValue($item, $ping); // Ping-Ergnis speichern
            }
        
    }
}

?>

Ich seh keinen Fehler. Ich denk du musst das Script von der ersten Seite nehmen da du ja noch das ältere IP Symcon hast.
Beim mir geht das Script das du benutzt hast. Habe aber auch IP Symcon 5
Das Script von der Ersten Seite ging be mir nicht.

nimm mal das:

// (C) by IP-Symcon 2009
// Trigger: z.B. alle 5 Minuten

foreach(IPS_GetChildrenIDs($IPS_SELF) as $item){   // alle Unterobjekte
    $id_info = IPS_GetObject($item);
    $id_typ = $id_info['ObjectType'];
    if ($id_typ == 2){                                      // nur bei Variablen
        $id_adr = $id_info['ObjectInfo'];
        $ping = Sys_Ping($id_adr, 1000);             // Ping max. 2 Sek. warten
        if($IPS_SENDER == "Execute") {                     // zum Testen
            echo "IP: $id_adr 
";
            echo "Ping: " .(int)$ping. "

";
        }
        SetValue($item, $ping);                      // Ping-Ergnis speichern
    }
}  
1 „Gefällt mir“