Einzelnen Beitrag anzeigen

moelski

Registriert seit: 31. Jul 2004
1.110 Beiträge
 
Delphi 2010 Professional
 
#1

SNMP Trap senden mit Indy ?

  Alt 21. Sep 2009, 09:30
Moin !

Ich versuche gerade mittels SNMP einen Trap zu senden.
Leider klappt das nicht wirklich.

Als Trap Receiver nutze ich den hier:
http://www.net-snmp.org/

snmptrapd -f -Lo -c SNMPAuto.txt
wobei SNMPAuto.txt so aussieht:
Zitat:
disableAuthorization yes
Als Code nutze ich das hier:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var trap : Integer;
begin
    IdSNMP1.Trap.Host := '192.168.30.105';
    IdSNMP1.Trap.Community := 'public';
    IdSNMP1.Trap.PDUType := $a4;
    IdSNMP1.Trap.GenTrap := 2;
    IdSNMP1.Trap.SpecTrap := 0;
    IdSNMP1.Trap.MIBValue.Add('Testtrap');
    IdSNMP1.Trap.MIBOID.Add('1.3.6.1.2.1.1.1');
    IdSNMP1.Trap.Port := 162;

    Trap := IdSNMP1.SendTrap;
end;
Aber leider bekomme ich als Antwort:
Zitat:
Bad PDU type received: 0x24
Und auch wenn ich einen anderen Trap Receiver nutze kommt nix an.

Hat jemand ein funktionierendes Trap Beispiel, was man mal nachvollziehen kann?
Oder sieht hier jemand einen Fehler im Code !?
Dominik Schmidt
Greetz Dominik

I love Delphi 2007/2010
  Mit Zitat antworten Zitat