Zitat von
Sharky:
Zitat von
bjacke:
Dann könnte ich doch theoretisch nur rausfinden, ob eine Iaddi onlie ist, wenn Daten gesendet werden?
Hmmm... wie schon gesagt wurde müsstest Du die Domain anpingen!
Delphi-Quellcode:
Begin
for i:=1 to 5 do
Case i of
1:Label9.Caption:=ping('setiboinc.ssl.berkeley.edu');
2:Label10.Caption:=ping('predictor.scripps.edu');
3:Label11.Caption:=ping('climateapps2.oucs.ox.ac.uk');
4:Label12.Caption:=ping('lhcathome.cern.ch');
5:Label13.Caption:=ping('einstein.phys.uwm.edu');
End; //case
end;
Sorry, hatte ich vergessen zu sagen, es muss excat die angegebene Seite sein, leider
.
Dann wird
<scheduler_reply>
<message priority="low">Incomplete request received.</message>
</scheduler_reply>
zurückgegeben, also Daten gesendet.
Habe das jetzt so gelöst, was denkt ihr:
Delphi-Quellcode:
Iadd:= 'http://setiboinc.ssl.berkeley.edu/sah_cgi/cgi';
if not FileExists(Iadd) then label9.Caption:='offline' ;
xmlDoc:=CoDomDocument40.Create;
xmlDoc.setProperty('NewParser',true);
xmlDoc.load(Iadd) ;
if xmlDoc.parseError.errorCode = 0 then
Begin
label9.Caption:='online'
End;