VBS: Traffic von Netzwerkinterface auslesen?

Seite 1 von 1 - Forum: Coding Stuff auf overclockers.at

URL: https://www.overclockers.at/coding-stuff/vbs-traffic-von-netzwerkinterface-auslesen_223190/page_1 - zur Vollversion wechseln!

GrandAdmiralThrawn schrieb am 29.03.2011 um 15:24

Hallo!

Ich versuche gerade, mittels VBS auf das WMI Objekt Win32_PerfFormattedData_Tcpip_NetworkInterface zuzugreifen, um die Attribs BytesReceivedPersec und BytesSentPersec auszulesen (aktuellen Traffic auf bestimmtem Interface visualisieren).

Wenn ich mein VBScript ausführe, liefern selbige Attribute aber in 90% der Fälle "0" und manchmal einen Wert zurück. Bin mir ned ganz sicher, was ich hier falsch mache.. aber im WMI Explorer schauts genauso aus.

Code: VB

Const Flag1 = &h10
Const Flag2 = &h20

Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Query = "SELECT BytesReceivedPersec, BytesSentPersec FROM Win32_PerfFormattedData_Tcpip_NetworkInterface WHERE Name = '3Com Gigabit LOM [3C940]'"

Set colItems = objWMIService.ExecQuery(Query,"WQL",Flag1+Flag2)

For Each objItems In colItems
  Wscript.echo "Bandwidth IN: " & objItems.BytesReceivedPersec & " B/s, Bandwidth OUT: " & objItems.BytesSentPersec & " B/s."
Next

Wie gesagt, manchmal kommen etwas eigenartige Werte raus, meistens nur "0". Gibt es einen besseren/vernünftigeren Weg, den aktuellen Traffic pro Sekunde von einem Netzwerkinterface mittels WMI auszulesen? Ohne dabei auf Rohdaten wie in Win32_PerfRawData_Tcpip_NetworkInterface zurückgreifen zu müssen?

Danke..

Umlüx schrieb am 29.03.2011 um 16:03

scheint am OS zu liegen? das objekt wird wohl nicht sauber unterstützt.
im W7 und 2008 funktioniert es bei mir. unter XP nicht. da bekomme ich ebenfalls nur 0

GrandAdmiralThrawn schrieb am 29.03.2011 um 16:04

k, dann wird's daran liegen, habe XP, jo.. Hm, kennt irgendwer eine Alternative?

pinkey schrieb am 29.03.2011 um 16:11

Zitat von GrandAdmiralThrawn
k, dann wird's daran liegen, habe XP, jo.. Hm, kennt irgendwer eine Alternative?

alternative in vbs oder ...?

GrandAdmiralThrawn schrieb am 29.03.2011 um 19:25

Bin leider völlig auf VBScript in diesem Fall limitiert, ja. Und am liebsten keine modernen Objekte, kann gut sein, daß der Code auch auf Win2000 noch laufen muß, alallalala

spunz schrieb am 29.03.2011 um 19:28

snmp service eine option, den gibts auch bei w2k?

GrandAdmiralThrawn schrieb am 30.03.2011 um 07:53

Habe ich mir auch schon überlegt, jo, bin nur deswegen davon zurückgeschreckt, weil es ungleich komplizierter zu sein scheint, als einfach ein paar Werte aus einem WMI Objekt auszulesen.. Müßte ich mir Mal genauer ansehen.