Mailin Routine

[andrew22]

hi ho !

Ich habe länger kein Notes mehr gemacht und stehe jetzt vor einen Problem und zwar :

Habe ich eine Mailin Datenbank. Ein Kunde sendet eine Mail an die Mailin Datenbank. Diese Mail kommt in der Mailin Datenbank und soll an die Benutzer die in der Mailin Datenbank dafür registriert sind eine Benachrichtigung bekommen das eine neue Mail angekommen ist mit einem kleinen info Text und nem DocLink Auf die jeweilige Mail.

Gesetz den Fall das die Mailin Datenbank 2 oder 3 User hat an die diese mail gesendet werden soll.

User 1 fällt dann ein das er diese Mail ja an seine Mitarbeiter weiterleiten kann bzw. senden kann und tut das. Nur dazu braucht er ja keine BestätigungsMail mehr zu bekommen .

Sollte man diesen Prozess in Formelsprache oder Lotus Script machen.
Es soll halt ein Agent laufen der immer gestartet wird wenn ne neue mail reinkommt.

kann mir jemand weiter helfen .

vielleicht hat ja jemand schon eine Formel Routine oder Lotus Script

wäre euch sehr dankbar

bis dann

[umi]

Zur rep.
Teil 1:
Benutzer können sich bei der Mail-In DB registrieren.
Diese bekommen eine Nachricht, sobald eine neue Mail in der Mail-In angekommen ist.

Teil 2:

User 1 fällt dann ein das er diese Mail ja an seine Mitarbeiter weiterleiten kann bzw. senden kann und tut das. Nur dazu braucht er ja keine BestätigungsMail mehr zu bekommen .

Was genau tut das bedeuten tun???
Was genau willst Du verhindern

[maxx]

Hallo,
ich habe einen Agent der schaut in die Inbox einer Mailindb und schickt eine Mail mit einem DOCLink an die Leute die im Agent eingetragen sind.

Dim session As New notessession
   Dim dbmailin As NotesDatabase
   Dim view As NotesView
   Dim item As notesitem
                ' Anzahl der Empfänger in newempf
   Dim newempf( 1 To 6) As String
   
   Set dbmailin = session.CurrentDatabase
   Dim doc As NotesDocument
   Dim docmail As notesdocument
   Dim rtitem As NotesRichTextItem
      
   Set view = dbmailin.GetView("($Inbox)")
   Set doc = view.GetFirstDocument
   While Not doc Is Nothing
                'Überprüfen ob zu der Mail schon eine Benachrichtigung geschickt wurde
   If doc.flag(0) <> "True" Then
   Set docmail = New NotesDocument(dbmailin)
            
   docmail.Form = "Memo"
   docmail.SendTo = ""
            
   Set item = docmail.GetFirstItem( "SendTo" )
   'newempf( 1 ) = "Vorname Nachname"
   newempf( 1 ) = "Hans Muster"            Call item.AppendToTextList( newempf )
   docmail.Subject = doc.subject(0)
   Set rtitem = New NotesRichTextItem( docmail, "Body" )
                'anhängen der Mail als Doclink
   Call rtitem.AppendDocLink(doc,doc.subject(0) )
                'Flag setzen damit beim nächsten Lauf das Dokument nicht noch mal verarbeitet wird
   doc.flag= "True"
   Call doc.Save(True,False)
   Call docmail.Send( False )
   Set docmail = Nothing
            
   End If   
   Set doc = view.GetNextDocument(doc)
   Wend
   
End Sub

Ich hoffe ich konnte dir weiterhelfen.

Gruß

Maxx

[max.power]

Hallo,

@maxx:
Wenn ich das richtig verstanden habe, dann macht deine Routine genau das, was ein "Bei Eingang neuer Mail"-Agent mit der einfachen Aktion "Mail senden" macht...? So ein Agent sendet ja auch nur einmal, ist aber - vor allem für einen "Normaluser" wesentlich einfach zu handhaben und zu warten (Empfänger ändern etc.).

@andrew22:
So ganz verstehe ich dein Problem leider noch nicht...
Du hast die Befürchtung, dass User A, B und C eine Benachrichtigung (mit Doclink) bekommen und User A dann diese Benachrichtigung auch noch an B und C weiterleitet? Oder, dass A dann in die Mail-In-Datenbank geht und das Mail selbst auch noch an B und C schickt? 

LG,
Max

[maxx]

Hallo,

@max.power:
ja, das müsste die einfache Methode auch machen. Bei uns läuft er Agent alle 15 minuten von früh um 7 bis abends um 17 Uhr. Ich weiss leider nicht mehr was der Auslöser war, aber irgendwas mit dem Nach Eingang neuer Mail hat nicht geklappt(hatte es erst so versucht). Ich habe auch ein paar Zeilen Code weg gelassen u.a.. Ich prüfe noch auf welchen Server die DB sich befindet damit er nur auf einen die Mail verschickt. Das Problem war halt das man nicht mitbekommen hat wenn eine neue Mail gekommen in die MailinDB ist und dann waren es aufeinmal viele. Stimmt es ist ein Wartungsaufwand im Moment werden nur ein paar Leute informiert wenn eine Mail da ist. 

Gruß

Maxx

[max.power]

Hmm, es sollte im Prinzip kein Problem darstellen, so einen simplen "Nach Eingang neuer Mail"-Agent zum Laufen zu bringen, wäre doch gelacht - obwohl ich auch da schon Probleme hatte

Das Prüfen nach dem Server kannst du dir aber sicherlich jetzt schon sparen, einem periodischen Agent kann man beim Zeitplan sagen, auf welchem Server er laufen soll.

Naja - falls du Lust hast, mal den simplen Agent wieder anzulegen und er läuft nicht, dann kannst du ja hier das Protokoll des Agent posten (evtl. besser in einem neuen Thread, weil der hier ja eigtl. andrew22 gehört ), wird schon ne Lösung geben

LG,
Max