Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
Tool Pingstatistik, Internetkonnektivitaet?
60 views
Skip to first unread message
Martin Eckel
Feb 4, 2012, 2:23:55 PM2/4/12
to
Hallo,
mein UMTS-Netzzugang ist leider relativ instabil. Vor einer Woche war er
kaputt, vorgestern war er auch kaputt, heute hakts ab und an, diesmal
sagt die Hotline aber zur Abwechslung, die Techniker könnten Netzseitig
nichts feststellen (die letzten beiden Male hörte ich: Oh, ja, die
Störung ist gerade behoben).
Nun möchte die Hotline wissen, wann genau das Internet ausfällt, diese
Information könnte dann zu den Technikern durchgegeben werden.
Ich suche also ein Tool, welches die Verbindung ins Internet überwacht
und protokolliert, wann diese nicht vorhanden war.
Die Krönung des ganzen wäre es, wenn in diesem Moment das Webinterface
meines Routers gesichert werden kann, da meist der Internetausfall mit
einem totalen Signalverlust des Mastes einhergeht (nicht immer, manchmal
gibts auch volles Signal und dennoch keine Daten).
Gruß,
Martin
mein UMTS-Netzzugang ist leider relativ instabil. Vor einer Woche war er
kaputt, vorgestern war er auch kaputt, heute hakts ab und an, diesmal
sagt die Hotline aber zur Abwechslung, die Techniker könnten Netzseitig
nichts feststellen (die letzten beiden Male hörte ich: Oh, ja, die
Störung ist gerade behoben).
Nun möchte die Hotline wissen, wann genau das Internet ausfällt, diese
Information könnte dann zu den Technikern durchgegeben werden.
Ich suche also ein Tool, welches die Verbindung ins Internet überwacht
und protokolliert, wann diese nicht vorhanden war.
Die Krönung des ganzen wäre es, wenn in diesem Moment das Webinterface
meines Routers gesichert werden kann, da meist der Internetausfall mit
einem totalen Signalverlust des Mastes einhergeht (nicht immer, manchmal
gibts auch volles Signal und dennoch keine Daten).
Gruß,
Martin
Winfried Sonntag
Feb 5, 2012, 2:44:22 PM2/5/12
to
Am 04.02.2012 schrieb Martin Eckel:
> mein UMTS-Netzzugang ist leider relativ instabil. Vor einer Woche war er
> kaputt, vorgestern war er auch kaputt, heute hakts ab und an, diesmal
> sagt die Hotline aber zur Abwechslung, die Techniker könnten Netzseitig
> nichts feststellen (die letzten beiden Male hörte ich: Oh, ja, die
> Störung ist gerade behoben).
>
> Nun möchte die Hotline wissen, wann genau das Internet ausfällt, diese
> Information könnte dann zu den Technikern durchgegeben werden.
>
> Ich suche also ein Tool, welches die Verbindung ins Internet überwacht
> und protokolliert, wann diese nicht vorhanden war.
Start > Ausführen > cmd [ENTER] > ping -t 8.8.8.8 >ping.txt [ENTER].
> mein UMTS-Netzzugang ist leider relativ instabil. Vor einer Woche war er
> kaputt, vorgestern war er auch kaputt, heute hakts ab und an, diesmal
> sagt die Hotline aber zur Abwechslung, die Techniker könnten Netzseitig
> nichts feststellen (die letzten beiden Male hörte ich: Oh, ja, die
> Störung ist gerade behoben).
>
> Nun möchte die Hotline wissen, wann genau das Internet ausfällt, diese
> Information könnte dann zu den Technikern durchgegeben werden.
>
> Ich suche also ein Tool, welches die Verbindung ins Internet überwacht
> und protokolliert, wann diese nicht vorhanden war.
Es wird ein Dauerping auf eine Google DNS Server absetzt und in die
Ping.txt geschrieben.
Servus
Winfried
--
Connect2WSUS: http://www.grurili.de/tools/Connect2WSUS.exe
GPO's: http://www.gruppenrichtlinien.de
Community Forums NNTP Bridge: http://communitybridge.codeplex.com/
Martin Eckel
Feb 6, 2012, 2:35:16 AM2/6/12
to
Am 05.02.2012 20:44, schrieb Winfried Sonntag:
> Start> Ausführen> cmd [ENTER]> ping -t 8.8.8.8>ping.txt [ENTER].
> Es wird ein Dauerping auf eine Google DNS Server absetzt und in die
> Ping.txt geschrieben.
Ja, soweit kann ich die Kommandozeile auch noch bedienen.
> Start> Ausführen> cmd [ENTER]> ping -t 8.8.8.8>ping.txt [ENTER].
> Es wird ein Dauerping auf eine Google DNS Server absetzt und in die
> Ping.txt geschrieben.
Nutzt aber nichts, da keine Uhrzeit dabei ist.
Gruß,
Martin
Detlef Bosau
Feb 6, 2012, 4:26:01 AM2/6/12
to
On 02/05/2012 08:44 PM, Winfried Sonntag wrote:
>
> Start> Ausführen> cmd [ENTER]> ping -t 8.8.8.8>ping.txt [ENTER].
> Es wird ein Dauerping auf eine Google DNS Server absetzt und in die
> Ping.txt geschrieben.
>
Kans kategorischer Imperativ sagt Dir was?
>
> Start> Ausführen> cmd [ENTER]> ping -t 8.8.8.8>ping.txt [ENTER].
> Es wird ein Dauerping auf eine Google DNS Server absetzt und in die
> Ping.txt geschrieben.
>
Wir könnten "das Internet" ziemlich schnell dicht machen, wenn das jeder
täte.
Im übrigen geht das an der von $OP gewünschten Aussage vorbei.
Ich weiß aus dem Bauch heraus nicht, der Anbieter weiß es aus dem BAuch
heraus, ob das Radio Link Protokoll von UMTS einen Keep Alive hat.
Defintiv hat UMTS ein Pilotsignal, d.h. eine Station wird einen
Verbindungsabbruch bzw. ein zu schwaches Signal sehr wohl merken. Was
davon in den APIs hochgereicht wird und wie man dann in Windows
weiterverarbeitet, ist eine andere Frage.
Aber wir reden hier von einem Schicht 2 Problem - und da ist es
definitiv nicht im Sinne des Erfinders, irgendwelche DNS Server in
Irgendwoistan anzupingen. Die Server stört das vermutlich gar nicht mal
so sehr, wie die restlichen Benutzer, deren Datenverkehr hier
beeinträchtigt wird.
Martin Eckel
Feb 6, 2012, 5:07:43 AM2/6/12
to
Am 06.02.2012 10:26, schrieb Detlef Bosau:
> Aber wir reden hier von einem Schicht 2 Problem - und da ist es
> definitiv nicht im Sinne des Erfinders, irgendwelche DNS Server in
> Irgendwoistan anzupingen. Die Server stört das vermutlich gar nicht mal
> so sehr, wie die restlichen Benutzer, deren Datenverkehr hier
> beeinträchtigt wird.
Naja, es geht hier schliesslich nicht um ein wochenlanges dauerndes
> Aber wir reden hier von einem Schicht 2 Problem - und da ist es
> definitiv nicht im Sinne des Erfinders, irgendwelche DNS Server in
> Irgendwoistan anzupingen. Die Server stört das vermutlich gar nicht mal
> so sehr, wie die restlichen Benutzer, deren Datenverkehr hier
> beeinträchtigt wird.
Anpingen, sondern nur darum, an instabilen Tagen die Zeiten zu
protokollieren.
Von daher würd mir ein Ping-Tool, welches aber bitte die Zeiten
mitprotokolliert, schon ausreichend sein.
Samstag wollte vodafone von den zeitweiligen Ausfällen nichts wissen.
Als es Sonntag noch schlechter war, hab ich nochmal angerufen. Ja,
Ausfall der Basisstation.
Von der Hotline bestätigte Ausfälle der Basisstation am 27.1., am 2.2.
und am 5.2.. Zwischendurch hats auch mal gehakt, davon will die Hotline
aber nichts wissen.
Wirklich zuverlässig diese Hardware. Können die Techniker gleich vor Ort
bleiben.
Gruß,
Martin
Detlef Bosau
Feb 6, 2012, 5:59:53 AM2/6/12
to
On 02/06/2012 11:07 AM, Martin Eckel wrote:
>
> Naja, es geht hier schliesslich nicht um ein wochenlanges dauerndes
> Anpingen, sondern nur darum, an instabilen Tagen die Zeiten zu
> protokollieren.
> Von daher würd mir ein Ping-Tool, welches aber bitte die Zeiten
> mitprotokolliert, schon ausreichend sein.
Dann richte Deine Pings wenigstens an Dein Standardgateway, als solches
>
> Naja, es geht hier schliesslich nicht um ein wochenlanges dauerndes
> Anpingen, sondern nur darum, an instabilen Tagen die Zeiten zu
> protokollieren.
> Von daher würd mir ein Ping-Tool, welches aber bitte die Zeiten
> mitprotokolliert, schon ausreichend sein.
müsste Dir Deine UMTS Gegenstelle ja erscheinen.
>
> Samstag wollte vodafone von den zeitweiligen Ausfällen nichts wissen.
> Als es Sonntag noch schlechter war, hab ich nochmal angerufen. Ja,
> Ausfall der Basisstation.
>
> Von der Hotline bestätigte Ausfälle der Basisstation am 27.1., am 2.2.
> und am 5.2.. Zwischendurch hats auch mal gehakt, davon will die Hotline
> aber nichts wissen.
> Wirklich zuverlässig diese Hardware. Können die Techniker gleich vor Ort
> bleiben.
Über die Hardware wissen wir beide nichts. Mobilfunkkanäle unterliegen
einer sehr großen Zahl von möglichen Störungen. Was da nun genau
vorliegt, kann man nicht ohne weiteres sagen.
In den Fällen, in denen Arcor/Vodafone sagt, daß dort ein technisches
Problem bestanden hat, weißt Du es. Für den Rest bist Du auf Vermutungen
angewiesen.
Martin Eckel
Feb 6, 2012, 6:16:45 AM2/6/12
to
Am 06.02.2012 11:59, schrieb Detlef Bosau:
> Über die Hardware wissen wir beide nichts. Mobilfunkkanäle unterliegen
> einer sehr großen Zahl von möglichen Störungen. Was da nun genau
> vorliegt, kann man nicht ohne weiteres sagen.
Wenn die Signalstärke von -62dBm auf Null sinkt, dann ist wohl irgendwas
> Über die Hardware wissen wir beide nichts. Mobilfunkkanäle unterliegen
> einer sehr großen Zahl von möglichen Störungen. Was da nun genau
> vorliegt, kann man nicht ohne weiteres sagen.
am Mast faul...
> In den Fällen, in denen Arcor/Vodafone sagt, daß dort ein technisches
> Problem bestanden hat, weißt Du es. Für den Rest bist Du auf Vermutungen
> angewiesen.
Meter auseinander) gleichzeitig auftreten, liegt das Problem wohl auf
netzseite.
Gruß,
Martin
Detlef Bosau
Feb 6, 2012, 6:23:39 AM2/6/12
to
On 02/06/2012 12:16 PM, Martin Eckel wrote:
> Am 06.02.2012 11:59, schrieb Detlef Bosau:
>> Über die Hardware wissen wir beide nichts. Mobilfunkkanäle unterliegen
>> einer sehr großen Zahl von möglichen Störungen. Was da nun genau
>> vorliegt, kann man nicht ohne weiteres sagen.
>
> Wenn die Signalstärke von -62dBm auf Null sinkt, dann ist wohl irgendwas
> am Mast faul...
Dann sinkt zunächst mal die Signalstärke. Ob da am Mast was faul ist
> Am 06.02.2012 11:59, schrieb Detlef Bosau:
>> Über die Hardware wissen wir beide nichts. Mobilfunkkanäle unterliegen
>> einer sehr großen Zahl von möglichen Störungen. Was da nun genau
>> vorliegt, kann man nicht ohne weiteres sagen.
>
> Wenn die Signalstärke von -62dBm auf Null sinkt, dann ist wohl irgendwas
> am Mast faul...
oder ob sich da ein Tanklaster zwischengeschoben hat, ist nicht ohne
weiteres klar.
O.k., das ist sicher spitzfindig von mir, aber man muß da aufpassen,
Dinge nicht überzubewerten.
Aber gerade _so_ etwas ist nun auch ohne Ping rauszukriege, wobei die
Frage ist, ob das von den APIs abgedeckt wird.
>
>> In den Fällen, in denen Arcor/Vodafone sagt, daß dort ein technisches
>> Problem bestanden hat, weißt Du es. Für den Rest bist Du auf Vermutungen
>> angewiesen.
>
> Wenn diese Ausfälle sowohl bei mir privat wie bei mir in der Firma (500
> Meter auseinander) gleichzeitig auftreten, liegt das Problem wohl auf
> netzseite.
Du irgend einen DNS Server nicht anpingen kannst, hier möchtest Du
dokumentieren (und wie Du richitg andeutest: Mit Uhrzeit!), daß Du kein
Signal von der Basisstation mehr bekommst. Und genau das möchtest Du
Vodafone auch unter die Nase reiben.
>
> Gruß,
> Martin
>
Martin Eckel
Feb 6, 2012, 6:53:33 AM2/6/12
to
Am 06.02.2012 12:23, schrieb Detlef Bosau:
> Dann sinkt zunächst mal die Signalstärke. Ob da am Mast was faul ist
> oder ob sich da ein Tanklaster zwischengeschoben hat, ist nicht ohne
> weiteres klar.
Beide Router hängen unterm Dach mit direkter Sichtverbindung zum Mast -
> Dann sinkt zunächst mal die Signalstärke. Ob da am Mast was faul ist
> oder ob sich da ein Tanklaster zwischengeschoben hat, ist nicht ohne
> weiteres klar.
da müßte schon ein Hubschrauber im Weg sein.
> Das klingt plausibel - nur: _Hier_ möchtest Du nicht dokumentieren, daß
> Du irgend einen DNS Server nicht anpingen kannst, hier möchtest Du
> dokumentieren (und wie Du richitg andeutest: Mit Uhrzeit!), daß Du kein
> Signal von der Basisstation mehr bekommst. Und genau das möchtest Du
> Vodafone auch unter die Nase reiben.
Signal vom Mast kommt, aber keine Daten fliessen. Dann scheint was mit
der weiteren Anbindung des Mastes nicht zu stimmen (ob dieser per
Standleitung oder per Richtfunkstrecke versorgt wird, weiß ich leider
nicht).
Deshalb wäre eine Kombination das beste: Internetkonnektivität
überprüfen, wenns nicht geht, Webinterface vom Router sichern, um später
zu sehen, ob auch das Signal weg war.
Von anderen Problemen, daß der ping manchmal kurzzeitig im
Sekundenbereich liegt, rede ich ja gar nicht...
Gruß,
Martin
Detlef Bosau
Feb 6, 2012, 7:01:25 AM2/6/12
to
On 02/06/2012 12:53 PM, Martin Eckel wrote:
>> Das klingt plausibel - nur: _Hier_ möchtest Du nicht dokumentieren, daß
>> Du irgend einen DNS Server nicht anpingen kannst, hier möchtest Du
>> dokumentieren (und wie Du richitg andeutest: Mit Uhrzeit!), daß Du kein
>> Signal von der Basisstation mehr bekommst. Und genau das möchtest Du
>> Vodafone auch unter die Nase reiben.
>
> Leider ist das nur ein Fall.
Aber ein Fall mit sehr qualifizierter Aussage. Bei der Aussage, daß Du
>> Das klingt plausibel - nur: _Hier_ möchtest Du nicht dokumentieren, daß
>> Du irgend einen DNS Server nicht anpingen kannst, hier möchtest Du
>> dokumentieren (und wie Du richitg andeutest: Mit Uhrzeit!), daß Du kein
>> Signal von der Basisstation mehr bekommst. Und genau das möchtest Du
>> Vodafone auch unter die Nase reiben.
>
> Leider ist das nur ein Fall.
irgend einen Rechner in New York nicht anpingen kannst, geht das ganze
im Fingerpointing unter. Aber wenn Du sagst, daß Du ein Signal von einem
nahe stehenden Sendemast nicht kriegst, hast Du eine qualifizierte
Aussage, daß da was nicht stimmt.
> Es gibt durchaus auch den Fall, daß volles
> Signal vom Mast kommt, aber keine Daten fliessen. Dann scheint was mit
> der weiteren Anbindung des Mastes nicht zu stimmen (ob dieser per
> Standleitung oder per Richtfunkstrecke versorgt wird, weiß ich leider
> nicht).
>
> Deshalb wäre eine Kombination das beste: Internetkonnektivität
> überprüfen,
gigantisch - sagt nur leider nicht wirklich was aus. Und es lädt
wunderbar zum Fingerpointing ein.
> wenns nicht geht, Webinterface vom Router sichern, um später
> zu sehen, ob auch das Signal weg war.
>
> Von anderen Problemen, daß der ping manchmal kurzzeitig im
> Sekundenbereich liegt, rede ich ja gar nicht...
>
sind, umso besser kriegst Du das entstört.
> Gruß,
> Martin
Ralph A. Schmid, dk5ras
Feb 6, 2012, 11:00:29 AM2/6/12
to
Detlef Bosau <detlef...@web.de> wrote:
>Dann richte Deine Pings wenigstens an Dein Standardgateway, als solches
>müsste Dir Deine UMTS Gegenstelle ja erscheinen.
Allerdings ist dieses bei T-Mobile zumindest neuerdings immer ein
>Dann richte Deine Pings wenigstens an Dein Standardgateway, als solches
>müsste Dir Deine UMTS Gegenstelle ja erscheinen.
Anderes, gerne einfach zugewiesene IP-Adresse -1. Also ist es u.U.
wenig zielführend, da einfach eine feste IP-Adresse einzutragen.
-ras
--
Ralph A. Schmid
http://www.dk5ras.de/ http://www.db0fue.de/
http://www.bclog.de/
Ralph A. Schmid, dk5ras
Feb 6, 2012, 11:00:29 AM2/6/12
to
Detlef Bosau <detlef...@Use-Author-Supplied-Address.invalid> wrote:
>Dann sinkt zunächst mal die Signalstärke. Ob da am Mast was faul ist
>oder ob sich da ein Tanklaster zwischengeschoben hat, ist nicht ohne
>weiteres klar.
>
>O.k., das ist sicher spitzfindig von mir, aber man muß da aufpassen,
>Dinge nicht überzubewerten.
Ja, auch andere Effekte auf dem Funkweg können passieren, Störungen
>Dann sinkt zunächst mal die Signalstärke. Ob da am Mast was faul ist
>oder ob sich da ein Tanklaster zwischengeschoben hat, ist nicht ohne
>weiteres klar.
>
>O.k., das ist sicher spitzfindig von mir, aber man muß da aufpassen,
>Dinge nicht überzubewerten.
von anderen Kanälen, anderen Anwendungen...die Empfänger in diesen
Sticks sind alles anderes als besonders störfest.
Detlef Bosau
Feb 6, 2012, 1:20:27 PM2/6/12
to
On 02/06/2012 05:00 PM, Ralph A. Schmid, dk5ras wrote:
> Detlef Bosau<detlef...@web.de> wrote:
>
>> Dann richte Deine Pings wenigstens an Dein Standardgateway, als solches
>> müsste Dir Deine UMTS Gegenstelle ja erscheinen.
>
> Allerdings ist dieses bei T-Mobile zumindest neuerdings immer ein
> Anderes, gerne einfach zugewiesene IP-Adresse -1. Also ist es u.U.
> wenig zielführend, da einfach eine feste IP-Adresse einzutragen.
>
>
Das war auch nicht mein Vorschlag.
> Detlef Bosau<detlef...@web.de> wrote:
>
>> Dann richte Deine Pings wenigstens an Dein Standardgateway, als solches
>> müsste Dir Deine UMTS Gegenstelle ja erscheinen.
>
> Allerdings ist dieses bei T-Mobile zumindest neuerdings immer ein
> Anderes, gerne einfach zugewiesene IP-Adresse -1. Also ist es u.U.
> wenig zielführend, da einfach eine feste IP-Adresse einzutragen.
>
>
Es sollte auch unter Windows möglich sein, so etwas wie ein netstat -rn
loszulassen.
Rüdiger Rösler
Feb 7, 2012, 2:37:35 AM2/7/12
to
Martin Eckel <martin...@t-online.de> typed:
Es gibt auch noch echo %time% und echo %date%, musst Du halt eine
Schleife bauen.
::::::::::::::::::::::::::::: PingIP.cmd ::::::::::::::::::::::::::::::
::::::::::::::::::::::::::: von h.r.roesler :::::::::::::::::::::::::::
:: Pingt alle 10 Sekunden die angegebene IP-Adresse
@echo off
setlocal
for /L %%i in (0,0,0) do (
echo %date% %time%: >> ping.txt
ping %1 >> ping.txt
ping -n 10 127.0.0.1 > nul:
)
endlocal
::::::::::::::::::::::::::::: PingIP.cmd ::::::::::::::::::::::::::::::
Beim Aufruf muss nur noch die IP-Adresse angegeben werden:
PingIP example.com
--
ЯR
Schleife bauen.
::::::::::::::::::::::::::::: PingIP.cmd ::::::::::::::::::::::::::::::
::::::::::::::::::::::::::: von h.r.roesler :::::::::::::::::::::::::::
:: Pingt alle 10 Sekunden die angegebene IP-Adresse
@echo off
setlocal
for /L %%i in (0,0,0) do (
echo %date% %time%: >> ping.txt
ping %1 >> ping.txt
ping -n 10 127.0.0.1 > nul:
)
endlocal
::::::::::::::::::::::::::::: PingIP.cmd ::::::::::::::::::::::::::::::
Beim Aufruf muss nur noch die IP-Adresse angegeben werden:
PingIP example.com
--
ЯR
Ralph A. Schmid, dk5ras
Feb 8, 2012, 1:02:22 AM2/8/12
to
Detlef Bosau <detlef...@web.de> wrote:
>Das war auch nicht mein Vorschlag.
>
>Es sollte auch unter Windows möglich sein, so etwas wie ein netstat -rn
>loszulassen.
Ich wollte nur darauf hinaus, daß man es eben ein bissl intelligent
>Das war auch nicht mein Vorschlag.
>
>Es sollte auch unter Windows möglich sein, so etwas wie ein netstat -rn
>loszulassen.
anfangen muß und nicht nur stupide die IP-Adresse abtippen sollte,
genau.
Rüdiger Rösler
Feb 8, 2012, 9:46:50 AM2/8/12
to
Martin Eckel <martin...@t-online.de> typed:
Ich habe jetzt mal ein altes Skript von mir etwas angepasst, dabei kommt
ein übersichtlicheres Log heraus, da nur die Fehlschläge protokolliert
werden:
'########################### CheckIP.vbs #############################
' von h.r.roesler
Option Explicit
' Pingt jede Minute eine IP-Adresse. Wird keine Adresse als
' Argument übergeben, wird die voreingestellte Adresse verwendet.
' Es kann auch eine Domain angegeben werden (z. B. example.com).
' Die Ausgabe kann in eine Textdatei umgeleitet werden.
' Es wird nur die Nicht-Erreichbarkeit des Servers protokolliert.
' Das Skript muss in der Eingabeaufforderung ausgeführt werden:
' CScript.exe [Pfad]CheckIP.vbs [IP-Adresse] [> Dateiname]
Const WINMGT = "winmgmts:{impersonationLevel=impersonate}!root/cimv2"
Dim wmi, Echo, strServer
Set wmi = GetObject(WINMGT)
Set Echo = WScript.StdOut
strServer = "8.8.8.8" ' google-public-dns-a.google.com
If WScript.Arguments.Count > 0 Then strServer = WScript.Arguments(0)
Do ' Pingt jede Minute die IP-Adresse
If Ping(strServer) Then WScript.Sleep 60000
Loop
Function Ping(strIP)
Dim wmiPing, blnPong, str
str = "select * from Win32_PingStatus where " & _
"ResolveAddressNames = True And Address='" & strIP & "'"
For Each wmiPing In wmi.ExecQuery(str)
If IsNull(wmiPing.StatusCode) Then Exit For
blnPong = wmiPing.StatusCode = 0
If Not(blnPong) Then Echo.Write Now & " Checking " & _
wmiPing.ProtocolAddressResolved & _
"[" & wmiPing.Address & "]" & ": " & _
EvalResult(wmiPing.StatusCode)
Next
Ping = blnPong
End Function
Function EvalResult(intNumber)
Dim arr
arr = Array("Success", "Buffer Too Small", "Destination Net" & _
" Unreachable", "Destination Host Unreachable", _
"Destination Protocol Unreachable", "Destination Port" & _
" Unreachable", "No Resources", "Bad Option", "Hard" & _
"ware Error", "Packet Too Big", "Request Timed Out", _
"Bad Request", "Bad Route", "TimeToLive Expired Transit", _
"TimeToLive Expired Reassembly", "Parameter Problem", _
"Source Quench", "Option Too Big", "Bad Destination")
ReDim Preserve arr(50)
arr(32) = "Negotiating IPSEC": arr(50) = "General Failure"
If intNumber > 11000 Then intNumber = intNumber - 11000
EvalResult = arr(intNumber) & vbCRLF
End Function
'########################### CheckIP.vbs #############################
Die Protokollierung wird durch CTRL-C wieder gestoppt.
--
ЯR
ein übersichtlicheres Log heraus, da nur die Fehlschläge protokolliert
werden:
'########################### CheckIP.vbs #############################
' von h.r.roesler
Option Explicit
' Pingt jede Minute eine IP-Adresse. Wird keine Adresse als
' Argument übergeben, wird die voreingestellte Adresse verwendet.
' Es kann auch eine Domain angegeben werden (z. B. example.com).
' Die Ausgabe kann in eine Textdatei umgeleitet werden.
' Es wird nur die Nicht-Erreichbarkeit des Servers protokolliert.
' Das Skript muss in der Eingabeaufforderung ausgeführt werden:
' CScript.exe [Pfad]CheckIP.vbs [IP-Adresse] [> Dateiname]
Const WINMGT = "winmgmts:{impersonationLevel=impersonate}!root/cimv2"
Dim wmi, Echo, strServer
Set wmi = GetObject(WINMGT)
Set Echo = WScript.StdOut
strServer = "8.8.8.8" ' google-public-dns-a.google.com
If WScript.Arguments.Count > 0 Then strServer = WScript.Arguments(0)
Do ' Pingt jede Minute die IP-Adresse
If Ping(strServer) Then WScript.Sleep 60000
Loop
Function Ping(strIP)
Dim wmiPing, blnPong, str
str = "select * from Win32_PingStatus where " & _
"ResolveAddressNames = True And Address='" & strIP & "'"
For Each wmiPing In wmi.ExecQuery(str)
If IsNull(wmiPing.StatusCode) Then Exit For
blnPong = wmiPing.StatusCode = 0
If Not(blnPong) Then Echo.Write Now & " Checking " & _
wmiPing.ProtocolAddressResolved & _
"[" & wmiPing.Address & "]" & ": " & _
EvalResult(wmiPing.StatusCode)
Next
Ping = blnPong
End Function
Function EvalResult(intNumber)
Dim arr
arr = Array("Success", "Buffer Too Small", "Destination Net" & _
" Unreachable", "Destination Host Unreachable", _
"Destination Protocol Unreachable", "Destination Port" & _
" Unreachable", "No Resources", "Bad Option", "Hard" & _
"ware Error", "Packet Too Big", "Request Timed Out", _
"Bad Request", "Bad Route", "TimeToLive Expired Transit", _
"TimeToLive Expired Reassembly", "Parameter Problem", _
"Source Quench", "Option Too Big", "Bad Destination")
ReDim Preserve arr(50)
arr(32) = "Negotiating IPSEC": arr(50) = "General Failure"
If intNumber > 11000 Then intNumber = intNumber - 11000
EvalResult = arr(intNumber) & vbCRLF
End Function
'########################### CheckIP.vbs #############################
Die Protokollierung wird durch CTRL-C wieder gestoppt.
--
ЯR
Rüdiger Rösler
Feb 8, 2012, 2:27:23 PM2/8/12
to
Mich tippte:
> Do ' Pingt jede Minute die IP-Adresse
> If Ping(strServer) Then WScript.Sleep 60000
> Loop
Diese Schleife sollte ersetzt werden durch diese, um die Zuverlässigkeit
zu erhöhen: :-)
Do ' Pingt jede Minute die IP-Adresse
If Ping(strServer) Then
WScript.Sleep 60000
Else
wshShell.Exec "ipconfig.exe /flushdns"
WScript.Sleep 1000
End If
Loop
--
ЯR
> Do ' Pingt jede Minute die IP-Adresse
> If Ping(strServer) Then WScript.Sleep 60000
> Loop
zu erhöhen: :-)
Do ' Pingt jede Minute die IP-Adresse
If Ping(strServer) Then
WScript.Sleep 60000
wshShell.Exec "ipconfig.exe /flushdns"
WScript.Sleep 1000
End If
Loop
--
ЯR
Rüdiger Rösler
Feb 8, 2012, 2:38:19 PM2/8/12
to
Mich tippte:
Hier noch mal das ganze Skript, die vorherige Version funktioniert unter
Umständen nicht zuverlässig:
'########################### CheckIP.vbs #############################
' von h.r.roesler
Option Explicit
' Pingt jede Minute eine IP-Adresse. Wird keine Adresse als
' Argument übergeben, wird die voreingestellte Adresse verwendet.
' Es kann auch eine Domain angegeben werden (z. B. example.com).
' Die Ausgabe kann in eine Textdatei umgeleitet werden.
' Es wird nur die Nicht-Erreichbarkeit des Servers protokolliert.
' Das Skript muss in der Eingabeaufforderung ausgeführt werden:
' CScript.exe [Pfad]CheckIP.vbs [IP-Adresse] [> Dateiname]
Const WINMGT = "winmgmts:{impersonationLevel=impersonate}!root/cimv2"
Dim wmi, Echo, wshShell, strServer
Set wmi = GetObject(WINMGT)
Set Echo = WScript.StdOut
Set wshShell = CreateObject("WScript.Shell")
strServer = "8.8.8.8" ' google-public-dns-a.google.com
If WScript.Arguments.Count > 0 Then strServer = WScript.Arguments(0)
Do ' Pingt jede Minute die IP-Adresse
If Ping(strServer) Then
WScript.Sleep 60000
--
ЯR
Hier noch mal das ganze Skript, die vorherige Version funktioniert unter
Umständen nicht zuverlässig:
'########################### CheckIP.vbs #############################
' von h.r.roesler
Option Explicit
' Pingt jede Minute eine IP-Adresse. Wird keine Adresse als
' Argument übergeben, wird die voreingestellte Adresse verwendet.
' Es kann auch eine Domain angegeben werden (z. B. example.com).
' Die Ausgabe kann in eine Textdatei umgeleitet werden.
' Es wird nur die Nicht-Erreichbarkeit des Servers protokolliert.
' Das Skript muss in der Eingabeaufforderung ausgeführt werden:
' CScript.exe [Pfad]CheckIP.vbs [IP-Adresse] [> Dateiname]
Const WINMGT = "winmgmts:{impersonationLevel=impersonate}!root/cimv2"
Set wmi = GetObject(WINMGT)
Set Echo = WScript.StdOut
strServer = "8.8.8.8" ' google-public-dns-a.google.com
If WScript.Arguments.Count > 0 Then strServer = WScript.Arguments(0)
Do ' Pingt jede Minute die IP-Adresse
If Ping(strServer) Then
WScript.Sleep 60000
Else
wshShell.Exec "ipconfig.exe /flushdns"
WScript.Sleep 1000
End If
wshShell.Exec "ipconfig.exe /flushdns"
WScript.Sleep 1000
End If
ЯR
Rüdiger Rösler
Feb 11, 2012, 11:23:20 AM2/11/12
to
Mich tippte:
[Skript]
Um ein einheitliches Erscheinungsbild des Protokolls auch beim Aufruf
von Domain-Namen zu gewährleisten, mussten leider noch einige
Ergänzungen gemacht werden. Dies ist nun die Release-Wörschen:
'########################### CheckIP.vbs #############################
' von h.r.roesler
Option Explicit
' Pingt alle 15 Sekunden eine IP-Adresse. Wird keine Adresse als
Set wmi = GetObject(WINMGT)
Set Echo = WScript.StdOut
Set wshShell = CreateObject("WScript.Shell")
strHost = "8.8.8.8" ' google-public-dns-a.google.com
If WScript.Arguments.Count > 0 Then strHost = WScript.Arguments(0)
Do ' Pingt alle 15 Sekunden die IP-Adresse
If Ping(strHost, Not(blnBooze), str) Then
WScript.Sleep 60000 \ 4
If Not(blnBooze) Then blnBooze = True
Else
If blnBooze Then wshShell.Exec "ipconfig.exe /flushdns"
WScript.Sleep 1000
If blnBooze Then blnBooze = False
End If
Loop
Function Ping(ByRef strIP, blnSip, ByRef strFormerMsg)
Dim wmiPing, blnPong, strQuery, str
strQuery = "select * from Win32_PingStatus where " & _
If IsNull(wmiPing.StatusCode) Then str = Now & " Null": Exit For
If IsNumeric(wmiPing.ProtocolAddress) Then
strIP = wmiPing.ProtocolAddress
End If
End If
str = Now & " Checking " & wmiPing.ProtocolAddressResolved & _
" [" & strIP & "]: " & Eval(wmiPing.StatusCode)
Next
If Not(blnPong) Or blnSip Then
If Not(blnPong) And Len(strFormerMsg) > 0 Then
Echo.WriteLine strFormerMsg
strFormerMsg = ""
End If
Echo.WriteLine str
Else
strFormerMsg = str
End If
Ping = blnPong
End Function
Function Eval(lngNumber)
Eval = arr(lngNumber)
[Skript]
Um ein einheitliches Erscheinungsbild des Protokolls auch beim Aufruf
von Domain-Namen zu gewährleisten, mussten leider noch einige
Ergänzungen gemacht werden. Dies ist nun die Release-Wörschen:
'########################### CheckIP.vbs #############################
' von h.r.roesler
Option Explicit
' Argument übergeben, wird die voreingestellte Adresse verwendet.
' Es kann auch eine Domain angegeben werden (z. B. example.com).
' Die Ausgabe kann in eine Textdatei umgeleitet werden.
' Es wird die Nicht-Erreichbarkeit eines Hosts protokolliert.
' Es kann auch eine Domain angegeben werden (z. B. example.com).
' Die Ausgabe kann in eine Textdatei umgeleitet werden.
' Das Skript muss in der Eingabeaufforderung ausgeführt werden:
' CScript.exe [Pfad]CheckIP.vbs [IP-Adresse] [> Dateiname]
Const WINMGT = "winmgmts:{impersonationLevel=impersonate}!root/cimv2"
Dim wmi, Echo, wshShell, strHost, blnBooze, str
' CScript.exe [Pfad]CheckIP.vbs [IP-Adresse] [> Dateiname]
Const WINMGT = "winmgmts:{impersonationLevel=impersonate}!root/cimv2"
Set wmi = GetObject(WINMGT)
Set Echo = WScript.StdOut
Set wshShell = CreateObject("WScript.Shell")
If WScript.Arguments.Count > 0 Then strHost = WScript.Arguments(0)
Do ' Pingt alle 15 Sekunden die IP-Adresse
If Ping(strHost, Not(blnBooze), str) Then
WScript.Sleep 60000 \ 4
If Not(blnBooze) Then blnBooze = True
Else
If blnBooze Then wshShell.Exec "ipconfig.exe /flushdns"
WScript.Sleep 1000
If blnBooze Then blnBooze = False
End If
Loop
Function Ping(ByRef strIP, blnSip, ByRef strFormerMsg)
Dim wmiPing, blnPong, strQuery, str
strQuery = "select * from Win32_PingStatus where " & _
"ResolveAddressNames = True And Address='" & strIP & "'"
For Each wmiPing In wmi.ExecQuery(strQuery)
If IsNull(wmiPing.StatusCode) Then str = Now & " Null": Exit For
blnPong = wmiPing.StatusCode = 0
If Not(IsNumeric(strIP)) Then
If IsNumeric(wmiPing.ProtocolAddress) Then
strIP = wmiPing.ProtocolAddress
End If
End If
str = Now & " Checking " & wmiPing.ProtocolAddressResolved & _
" [" & strIP & "]: " & Eval(wmiPing.StatusCode)
Next
If Not(blnPong) Or blnSip Then
If Not(blnPong) And Len(strFormerMsg) > 0 Then
Echo.WriteLine strFormerMsg
strFormerMsg = ""
End If
Echo.WriteLine str
Else
strFormerMsg = str
End If
Ping = blnPong
End Function
Dim arr
arr = Array("Success", "Buffer Too Small", "Destination Net" & _
" Unreachable", "Destination Host Unreachable", _
"Destination Protocol Unreachable", "Destination Port" & _
" Unreachable", "No Resources", "Bad Option", "Hard" & _
"ware Error", "Packet Too Big", "Request Timed Out", _
"Bad Request", "Bad Route", "TimeToLive Expired Transit", _
"TimeToLive Expired Reassembly", "Parameter Problem", _
"Source Quench", "Option Too Big", "Bad Destination")
ReDim Preserve arr(50)
arr(32) = "Negotiating IPSEC": arr(50) = "General Failure"
If lngNumber > 11000 Then lngNumber = lngNumber - 11000
arr = Array("Success", "Buffer Too Small", "Destination Net" & _
" Unreachable", "Destination Host Unreachable", _
"Destination Protocol Unreachable", "Destination Port" & _
" Unreachable", "No Resources", "Bad Option", "Hard" & _
"ware Error", "Packet Too Big", "Request Timed Out", _
"Bad Request", "Bad Route", "TimeToLive Expired Transit", _
"TimeToLive Expired Reassembly", "Parameter Problem", _
"Source Quench", "Option Too Big", "Bad Destination")
ReDim Preserve arr(50)
arr(32) = "Negotiating IPSEC": arr(50) = "General Failure"
Eval = arr(lngNumber)
Martin Eckel
Feb 13, 2012, 3:10:24 AM2/13/12
to
Am 11.02.2012 17:23, schrieb Rüdiger Rösler:
> [Skript]
Meine Güte, Du legst Dich aber ins Zeug :-)
Inzwischen hat vodafone mir bestätigt, daß an der Basisstation ein
defektes Bauteil ist und dieses in Kürze ausgetauscht wird...
Gruß,
Martin
> [Skript]
Meine Güte, Du legst Dich aber ins Zeug :-)
Inzwischen hat vodafone mir bestätigt, daß an der Basisstation ein
defektes Bauteil ist und dieses in Kürze ausgetauscht wird...
Gruß,
Martin
Rüdiger Rösler
Feb 13, 2012, 12:26:16 PM2/13/12
to
Martin Eckel <martin...@t-online.de> typed:
> Meine Güte, Du legst Dich aber ins Zeug :-)
Alles reine Konditionierung. Das Skript läuft allerdinx nur richtig,
wenn ICMPs erlaubt sind. Siehe dazu:
<http://de.wikipedia.org/wiki/IPv4#ICMP> oder
<http://de.wikipedia.org/wiki/Firewall-Regelwerk#ICMP-Regeln> oder
<http://www.tcpipguide.com/free/t_ICMPMessageTypesandFormats.htm> oder
<http://technet.microsoft.com/de-de/library/cc786041%28WS.10%29.aspx>.
Bei mir dauert das Schreiben eines Skripts meist nur wenige Minuten,
da ich meist schon Skripte ähnlicher Art geschrieben habe, so auch
in diesem Fall. Unter Windows XP bekam ich diese Ausgabe, als ich
den Router zurückgesetzt habe:
D:\>checkip google.com
13.02.2012 18:01:45 Checking bk-in-f103.1e100.net [173.194.69.103]: Success
13.02.2012 18:02:46 Checking bk-in-f103.1e100.net [173.194.69.103]: Success
13.02.2012 18:03:01 Checking [173.194.69.103]: Hardware Error
13.02.2012 18:03:02 Checking [173.194.69.103]: Hardware Error
13.02.2012 18:03:03 Checking [173.194.69.103]: Hardware Error
13.02.2012 18:03:05 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:08 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:10 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:13 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:15 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:18 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:20 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:23 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:25 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:26 Checking [173.194.69.103]: Destination Host Unreachable
[...]
13.02.2012 18:03:53 Checking [173.194.69.103]: Destination Host Unreachable
13.02.2012 18:03:56 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:58 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:04:01 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:04:02 Checking bk-in-f103.1e100.net [173.194.69.103]: Success
^C
Unter Windows 7 liefert das Skript nur einen "General Failure" zurück.
In beiden Fällen hatte ich den Router kurze Zeit ausgeschaltet,
während das Skript lief:
C:\Windows\system32>checkip
13.02.2012 16:06:23 Checking google-public-dns-a.google.com [8.8.8.8]: Success
13.02.2012 16:06:38 Checking [8.8.8.8]: General Failure
13.02.2012 16:06:39 Checking [8.8.8.8]: General Failure
13.02.2012 16:06:40 Checking [8.8.8.8]: General Failure
[...]
13.02.2012 16:07:53 Checking [8.8.8.8]: General Failure
13.02.2012 16:07:54 Checking google-public-dns-a.google.com [8.8.8.8]: Success
Ich weiß jedoch nicht, warum die beiden OS unterschiedliche
Informationen zurückliefern.
> Inzwischen hat vodafone mir bestätigt, daß an der Basisstation ein
> defektes Bauteil ist und dieses in Kürze ausgetauscht wird...
Das freut mich für Dich.
--
ЯR
> Meine Güte, Du legst Dich aber ins Zeug :-)
wenn ICMPs erlaubt sind. Siehe dazu:
<http://de.wikipedia.org/wiki/IPv4#ICMP> oder
<http://de.wikipedia.org/wiki/Firewall-Regelwerk#ICMP-Regeln> oder
<http://www.tcpipguide.com/free/t_ICMPMessageTypesandFormats.htm> oder
<http://technet.microsoft.com/de-de/library/cc786041%28WS.10%29.aspx>.
Bei mir dauert das Schreiben eines Skripts meist nur wenige Minuten,
da ich meist schon Skripte ähnlicher Art geschrieben habe, so auch
in diesem Fall. Unter Windows XP bekam ich diese Ausgabe, als ich
den Router zurückgesetzt habe:
D:\>checkip google.com
13.02.2012 18:01:45 Checking bk-in-f103.1e100.net [173.194.69.103]: Success
13.02.2012 18:02:46 Checking bk-in-f103.1e100.net [173.194.69.103]: Success
13.02.2012 18:03:01 Checking [173.194.69.103]: Hardware Error
13.02.2012 18:03:02 Checking [173.194.69.103]: Hardware Error
13.02.2012 18:03:03 Checking [173.194.69.103]: Hardware Error
13.02.2012 18:03:05 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:08 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:10 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:13 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:15 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:18 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:20 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:23 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:25 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:26 Checking [173.194.69.103]: Destination Host Unreachable
[...]
13.02.2012 18:03:53 Checking [173.194.69.103]: Destination Host Unreachable
13.02.2012 18:03:56 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:03:58 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:04:01 Checking [173.194.69.103]: Request Timed Out
13.02.2012 18:04:02 Checking bk-in-f103.1e100.net [173.194.69.103]: Success
^C
Unter Windows 7 liefert das Skript nur einen "General Failure" zurück.
In beiden Fällen hatte ich den Router kurze Zeit ausgeschaltet,
während das Skript lief:
C:\Windows\system32>checkip
13.02.2012 16:06:23 Checking google-public-dns-a.google.com [8.8.8.8]: Success
13.02.2012 16:06:38 Checking [8.8.8.8]: General Failure
13.02.2012 16:06:39 Checking [8.8.8.8]: General Failure
13.02.2012 16:06:40 Checking [8.8.8.8]: General Failure
[...]
13.02.2012 16:07:53 Checking [8.8.8.8]: General Failure
13.02.2012 16:07:54 Checking google-public-dns-a.google.com [8.8.8.8]: Success
Ich weiß jedoch nicht, warum die beiden OS unterschiedliche
Informationen zurückliefern.
> Inzwischen hat vodafone mir bestätigt, daß an der Basisstation ein
> defektes Bauteil ist und dieses in Kürze ausgetauscht wird...
--
ЯR
nbt...@gmail.com
Aug 13, 2014, 2:53:25 PM8/13/14
to
Herr Rösler?? wie leite ich die im DOS fenster dargestellten daten in eine textdatei um???
Hermann
Aug 13, 2014, 3:14:57 PM8/13/14
to
Am 13.08.2014 um 20:53 schrieb nbt...@gmail.com:
> wie leite ich die im DOS fenster dargestellten daten in eine textdatei um?
Z. B.:
> wie leite ich die im DOS fenster dargestellten daten in eine textdatei um?
ipconfig /all > c:\inhalt.txt
Gru�
Hermann
0 new messages