IdSNMP1.Community:= 'public';
IdSNMP1.Host:= '127.0.0.1';
IdSNMP1.Active := true;
IdSNMP1.Query.Clear;
IdSNMP1.Query.Port:=161;
idsnmp1.Query.MIBAdd('1.3.6.1.2.1.25.6.3.1.5.111',''); //enter your oid
here
IdSNMP1.Query.PDUType := PDUGetRequest; //PDUGetNextRequest for WALK
if idSNMP1.SendQuery then
for i := 0 to IdSNMP1.Reply.ValueCount - 1 do
memo1.lines.Add(Format('Value: %s',[IdSNMP1.Reply.Value[i]])
IdSNMP1.Active := false;
Esetleg innen töltsd le a progit, és ismerkedj vele. Kapcsolódj be UPS-hez és egy walk, vagy get-el kérd le milyen MIB-ek vannak, milyen infókat tudsz kinyerni.
A 10-es Indyben pedig találsz TIdSNMP kliens osztályt amivel Delphiből is le tudod kérni ezeket az adatokat.
Olyan problémám van, hogy a suliba kell csinálnom egy monitorozó progit, ami egy szünetmentes tápegységnek mutatja az adatait. Ja és snmp keresztül lehet lekérni csak az UPS-től mindent.
Sajnos az én delphi ismeretem nem terjed ki a snmp kezelésére. A felületet meg a többi általános funkciót megcsináltam.
Ehez kérnék segítséget, ha tudtok akkor példa progi sokat segítene. Elöre is köszönöm.