Einzelnen Beitrag anzeigen

meggles
(Gast)

n/a Beiträge
 
#3

Re: mittels Interbase-Event einen Wert an Delphi schicken

  Alt 13. Jan 2004, 08:29
Moinmoin,
ich programmiere an einem Datenbank-gestützten Emailprogramm, genauer zwei Programme.
Server: Holt für alle Nutzer die Emails per POP ab und schiebt sie in eine Tabelle TAB_EMAIL. Zu jeder Email wird auch der FK_Ordner des Posteingangs eines Users gespeichert.
Auf dies TAB_EMAIL möchte ich einen Afert-Insert-Trigger loslassen:
SQL-Code:
CREATE TRIGGER TAB_EMAIL_AI5_EVENT FOR TAB_EMAIL
ACTIVE AFTER INSERT POSITION 5
AS
DECLARE VARIABLE V_Ordnername VARCHAR(50);
begin
  SELECT o.name FROM tab_ordner o WHERE (o.id = new.ordner_id) INTO :V_Ordnername;
  IF (v_ordnername = 'Posteingang') THEN POST_EVENT new.Ordner_ID;
end
Dieses Event soll für den (betreffenden) Email-Client Zeichen sein, seinen Posteingang zu refrehen, damit die Email gleich sichtbar wird.

Wenn das nicht gehen sollte, müsste ich - sofern ich mit Events arbeiten will - für jeden Nutzer eine Tabelle anlegen, damit ich auch unterschiedliche Events (z.B. POST_EVENT 'maxmustermann') bekomme.

Hoffe, Du kannst mir da helfen - Danke gleich mal!
Simon
  Mit Zitat antworten Zitat