APC per WMI bzw. SNMP Modellbezeichung rausfinden

Ich weis nicht genau wo die Frage hingehört, daher poste ich sie mal etwas allgemeiner. Vielleicht kann einer von euch ja helfen ich hab mir was gebastelt, wo ich bei uns im Firmennetz die UpTime den DNS Namen usw. unserer USV's auslesen kann. Mir fehlt aber noch die Modellbezeichung und ich komm einfach nicht weiter. Brauche dringend Hilfe.

strTargetSnmpDevice = "Hier kommt die IP rein"  

Set objWmiLocator = CreateObject("WbemScripting.SWbemLocator")  
Set objWmiServices = objWmiLocator.ConnectServer("", "root\snmp\localhost")  

Set objWmiNamedValueSet = CreateObject("WbemScripting.SWbemNamedValueSet")  
objWmiNamedValueSet.Add "AgentAddress", strTargetSnmpDevice  
objWmiNamedValueSet.Add "AgentReadCommunityName", "public"  

Set colSystem = objWmiServices.InstancesOf("SNMP_RFC1213_MIB_system", , _  
    objWmiNamedValueSet)

For Each objSystem In colSystem
    WScript.Echo "sysContact:  " & objSystem.sysContact  & vbCrLf & _  
        "sysDescr:    " & objSystem.sysDescr    & vbCrLf & _  
            "sysLocation: " & objSystem.sysLocation & vbCrLf & _  
                "sysName:     " & objSystem.sysName     & vbCrLf & _  
                    "sysObjectID: " & objSystem.sysObjectID & vbCrLf & _  
                        "sysServices: " & objSystem.sysServices & vbCrLf & _  
                            "sysUpTime:   " & objSystem.sysUpTime & vbCrLf  
Next

Hier ist der bisherige Code...

Habt ihr da vielleicht eine Ideee?

Gruß,
Max

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 167994

Url: https://administrator.de/forum/apc-per-wmi-bzw-snmp-modellbezeichung-rausfinden-167994.html

Ausgedruckt am: 15.07.2025 um 08:07 Uhr

1 Kommentar

Hallo,

ich ignoriere mal die Tatsache, dass du weder grüsst, noch hallo sagst und deine Beschreibung relativ schwer zu identifizieren ist...

Hier findest du vlt. was du suchst.

Gruß
Dominique

Frage Microsoft

Heiß diskutiert