Deskmodder.de

Verfasst: **09.01.2006, 17:48**

Hi ...
Das PingII-Script aus dem Downloadbereich arbeitet bei mir nicht zuverlässig! Beim Testen im Config-Editor kommt zwar immer das richtige Ergebnis, aber wenn ich die Config auf dem Desktop lade werden zunächst alle (4 IP's werden angepingt) als online dargestellt. Nach einer ca. Minute ist die Anzeige dann richtig. Aber Ab un zu werden PC's als online Dargestellt die es nich sind. Die Lampen gehn also mal an, mal aus

. Das geht so die ganze Zeit. Die anzeige bringt mir also nichts wenn ich ihr nich vertrauen kann. So kann ich genausogut bei der Netzwerkumgebung nachgucken wer in der Arbeitsgruppe angezeigt wird. Habt ihr eine Lösung oder ein anderes Script?

PS: Ich habe auchmal das Script für jede IP zu kopieren, sodass jede Anzeige mit ihrem "eigenen Script" läuft. Ändert sich nichts. Es liegt auch nich an Firewalls. Ich hab die PC'S selber agepingt un das Ergebnis is anders als das Script es anzeigt.

Verfasst: **09.01.2006, 20:09**

Also ich verwende das Script "ping" (was es wohl hier nicht gibt) um den An/aus -Status der Rechner im Netzwerk zu erkennen. Hab noch keine Probs damit feststellen können.

Verfasst: **09.01.2006, 20:55**

gibt es einen funktionierenden downloadlink für dein script?
oda kannstu mir das schicken?

Verfasst: **09.01.2006, 21:13**

im Moment nicht. kann ich erst morgen machen. Aber evtl hat es ja einer hier, um es mal hochzustellen.

Verfasst: **10.01.2006, 11:34**

So hier mal der Code von Ping:

Code: Alles auswählen

DOWN_MSG = " is offline."	' message for an unsuccessful ping
UP_MSG = " is online."		' message for a successful ping

Function Pinger (machine, GetIP)

	Set objPing = GetObject("winmgmts:{impersonationLevel=impersonate}")._
	ExecQuery("select * from Win32_PingStatus where address = '"_
	& machine & "'")
	For Each objStatus in objPing
		If IsNull(objStatus.StatusCode) or objStatus.StatusCode<>0 Then 
			pinger = machine & DOWN_MSG
		Else	
			If GetIP = 1 then
				pinger = machine & " - " & objStatus.ProtocolAddress
			Else
				pinger = machine & UP_MSG
			End if
		End If
	Next

End Function

Einfach den Code kopieren, in einen Texteditor einfügen und als ping.vbs im Samurize\script-Verzeichnis abspeichern.

Verfasst: **10.01.2006, 13:35**

danke! ..aber was muss man für GetIP eingeben?

*edit: hat sich erledigt! .. hab mir das script ma genauer angeguckt^^

PS.:
Das Script arbeitet SEHR GUT und schnell!

Das alte Script hatte eine neue dll in windows\system benötigt ... und war langsam

Verfasst: **10.01.2006, 16:07**

Also bei Machine scheint das script ja von mir zu wollen, dasss ich dem Gerät, dass ich anpinge einen namen gebe.
Bei GetIP nehm ich also mal an, dass es da die IP von mir wissen will.

Hab ich alles dementsprechend gemacht.
Aber bei mir wird immer offline angezeigt. Hab Testweise auch mal den Router angepingt... Der müsste ja auf jeden fall online sein. War aber auch nix.

Hab das Ping genommen, dessen Code oben steht.

Verfasst: **10.01.2006, 16:33**

bei machine gibst du die IP-Addresse (z.b. 192.168.123.11) an. bei GetIP 1 oder "eine andere zahl" an. GetIP steuet was am Ende augegeben werden soll.

Und da Samurize.com wieder (wenn auch nur Teilweise und mit Verlusten) online ist hier der Link zum Orginalscript Ping with IP

Deskmodder.de

PingII-Script nicht zuverlässig! ..

PingII-Script nicht zuverlässig! ..