vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Suche Visual-Basic Code
Ping mit Timeout 
Autor: Gast Only4U
Datum: 14.05.03 00:03

Hi

Wie kann ich es anstellen, daß die Ping-Routiene aus den Tips nicht beim Wechsel des Online-Status 10 Sekunden für den Ping braucht?

Habe ein Proggy geschrieben, welches einen INet-Server anpingt. Sobald der Server nicht mehr gefunden wird, ist wohl mein Router abgeschmiert. Durch Stecker ziehen und wieder einstecken bekomme ich den Router wieder flott, mich interessierte nur, wie lange der Router durchgehalten hat.

Nun zu meinem Problem:
Wenn der Router abschmiert (simuliere ich durch Stecker ziehen), wird das Fenster meiner Anwendung weiß (also keinerlei Anzeige mehr in dem Fenster).
Das dauert ca 10 Sekunden, danach zeigt mir mein Proggy an, daß der Router tot ist.
Wenn danach der Stecker wieder eingesteckt wird hängt mein Proggy ebenfalls wieder ca. 10 Sekunden, bis ich die nächste Anzeige bekomme, daß der Router wieder online ist.

Als kleine Spielerei lasse ich noch das Proggy-Icon von einem grünen in einen roten Punkt wechseln (und umgekehrt).

Anzeige sieht so aus:

17:09:02 online (Programmstart)
17:18:37 offline
17:19:20 online
20:37:54 offline
.....

Funktion ist 1a.

Das einzige was mich stört ist, daß mein Proggy erst Sekunden nach der Browser-Fehlermeldung (Server nicht gefunden) den neuen Status anzeigt, eben, da es irgendwie hängen bleibt.

Kann ich einen Timeout einstellen, daß nach max 1 Sek ohne erfolgfreichem Ping der Status False ausgegeben wird?

z.B.:
Status = Ping (2000) 'Timeout=2000ms
oder
Status = Ping ("192.168.1.1",30) ' IP 192.168.1.1 anpingen mit Timeout 30ms

Kann einer von euch so was proggen?

MfG
Only4U
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Ping mit Timeout345Gast Only4U14.05.03 00:03
Re: Ping mit Timeout748Elwood14.05.03 07:33
Re: Was'n für'n Router (Lanware BR-1200)521Gast Only4U14.05.03 22:05

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel