SNMP und Indy

[Marcel Gascoyne]

@delphicus
Ich glaube er mein SNMP und nicht SMTP

Hier ein einfaches Beispiel für SNMP, liefert die sysDescr des Hosts:

Delphi-Quellcode:

program snmptest;

{$APPTYPE Console}

uses
  SysUtils, IdBaseComponent, IdComponent, IdUDPBase, IdUDPClient, IdSNMP;  

var
  Snmp: TIdSNMP;
  Idx:  Integer;

begin
  Snmp := TIdSNMP.Create(nil);
  Snmp.Query.Host := 'Hostname oder IP';
  Snmp.Query.Community := 'public';
  Snmp.Query.PDUType := PDUGetRequest;
  Snmp.Query.MIBAdd('1.3.6.1.2.1.1.1.0','');

  if Snmp.SendQuery then
  begin
    WriteLn('Replies: ' + IntToStr(Snmp.Reply.ValueCount));
    for Idx := 0 to Snmp.Reply.ValueCount - 1 do
      WriteLn(Snmp.Reply.Value[0]);
  end;
  
  Snmp.Free;
end.

Gruß,
Marcel