AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Ein Skript erstellen für Serverüberwachung. Mein Idee...
Thema durchsuchen
Ansicht
Themen-Optionen

Ein Skript erstellen für Serverüberwachung. Mein Idee...

Ein Thema von Jackie1983 · begonnen am 5. Jun 2009 · letzter Beitrag vom 8. Jun 2009
 
Jackie1983

Registriert seit: 12. Mär 2007
486 Beiträge
 
#1

Ein Skript erstellen für Serverüberwachung. Mein Idee...

  Alt 5. Jun 2009, 16:07
Servus,

mein Skript ist eigentlich fertig und funktioniert auch ganz gut. Nur lassen sich da einige Dinge nicht mit umsetzen.
Zur Zeit verwende ich die komp TJvInterpreterProgram
Hier ein kleines Beispiel
Delphi-Quellcode:
Unit Programm;

Procedure Main;
var
  s : string;
  i : integer;
begin
  i := PruefeDienst(DienstX);
  if i = 3 then
    Meldung('Achtung Dienst X hat den Status 3');
end;

end.
Das Skript läuft alle X Minuten. Jetzt wird der Dienst geprüft und bei Status 3 eine Meldung erstellt.
Habe es schon so gemacht das wenn der die Meldung schon vorher mit dem gleich Wert existiert wird diese nicht nochmal zum Server gesendet.

Aber es läst sich nicht regeln das wenn der Dienst bei der 4 Abfrage immer noch den Status 3 hat erst dann soll eine Meldung gesendet werden.
Man könnte aber es so umsetzten das ein Teil des Skriptest in einer Schleife läuft
Delphi-Quellcode:
Unit Programm;

Procedure Main;
var
  s : string;
  i,m : integer;
begin
  m := 0;
  while true do
  begin
    i := PruefeDienst(DienstX);
    inc(m);
    if (i = 3) AND (m = 4) then
    begin
      Meldung('Achtung Dienst X hat den Status 3');
      m := 0;
    end;
  end;
end;

end.
Was ich finde aber auch nicht gerade praktisch ist.
Ich suche halt eine Methode um ein Skript laufen zulassen was bestimmte dinge überwacht.
Pro Server läuft dann ein Skript. Man könnte natürlich auch ein Skript fürs netzwerk erstellen, aber welcher Server hat dann die Ehre und was ist wenn dieser mal Down ist.

Wenn ich bei andere Software mal schaue, erstellen diese meistens Textdateien.
Der Inhalt könnte dann so aussehen
Zitat:
[PING]
DEVICE=192.168.100.10
DEVICE=192.168.100.11

[DEVICE_192.168.100.10]
Meldung_Bei=3 // versuchen
Meldungs_Text='Bla'

[DEVICE_192.168.100.11]
Meldung_Bei=1 // versuchen
Meldungs_Text='Bla'
Was meint ihr? Was ist effektiver?
Pro Server ein Skript.
Pro Netzwerk ein Skript.
Skript mit Schleife oder doch ohne
Oder doch eine Textdatei.

Wäre um Tipps und Ideen dankbar.
Ein schönes WE.

Mfg
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:42 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz