WhatsUpGold v16.3 - WUG v16.3 - Performance Monitor to a Active Monitor

Hallo allerseits,

Ich bin blutiger Anfänger mit WUG und VBScript. Jetzt brauche ich dringend eure Hilfe. Ich habe eine Performance Monitor in Whatsup Gold konfiguriert, mit dem ich die Temperaturdaten auslesen kann. Jetzt muss ich das Script für einen Kunden als Active Monitor. Es ist das erste Mal, dass ich mit VBScript arbeite. Ich hoffe jemand kann mir helfen, denn ich bin langsam am verzweifeln

Hier wird der Performance Monitor-Skript:

Sending log message to the WhatsUp Event Viewer
Context.LogMessage "Checking Address=" & Context.GetProperty("Address")

'Get the value of the reference variable A
A = Context.GetReferenceVariable("A")

'Get the value of the reference variable B
B = Context.GetReferenceVariable("B")

C = A / 10

D = B / 10

E = C + D

F = E/2

'Set the Performance monitor value to graph
Context.SetValue F

if A = 0 then
G = B / 10

'Set the Performance monitor value to graph
Context.SetValue G

End if

if B = 0 Then
H = A / 10

'Set the Performance monitor value to graph
Context.SetValue H

End if

Danke für eure Unterstützung
VG Max