HCL Notes / Domino / Diverses > Entwicklung
Agent zum Ändern vom SendTo Feld?
schroederk:
Hallo,
wir haben vor Kurzem unsere Maildomain geändert. Die alte Adresse haben wir als Alias hinzugefügt, damit die Mails and die alte Adresse noch ankommen.
Jedesmal wenn ein Mitarbeiter eine Mail bekommt, die noch an die alte Adresse gesendet wurde und er antwortet an alle, dann erscheint seine alte Adresse im Kopie-An-Feld.
Die meisten passen nicht auf und erhalten dann ihre Antwort nochmal an sich selber zugestellt.
Die anderen nervt es auch, immer manuell den Empfänger aus der Kopie zu entfernen.
Ich hatte als Lösung gedacht, übergangsweise einen Agenten in die Schablone zu setzen, der nach Eingang einer Mail, prüft, ob an die alte Domain gesendet wurde und dann die alte Domain durch die neue Domain ersetzt.
In meinem Test wird der Agent zwar brav aufgerufen, nur scheint er nichts zu machen. Im Protokoll steht, dass er x Dokumente bearbeitet hat, aber geändert hat sich nichts.
Könnt ihr mal darüberschauen, was ich (mal wieder) falsch gemacht habe?
Nebenbei: wo ist eigentlich im 11er Client die Konsole hin, über die man im Agent mit Print Debug-Ausgaben erzeugen konnte?
Hier das Script:
--- Code: --- Dim session As New NotesSession
Dim doccol As NotesDocumentCollection
Dim newemail As NotesDocument
Dim sendto As String
Dim newsendto As String
Dim formula As String
Set doccol = session.currentdatabase.unprocesseddocuments
Set newemail = doccol.getfirstdocument
While Not (newemail Is Nothing)
'sendto = CStr(newemail.GetItemValue("SendTo")(0))
sendto = newemail.SendTo
newemail.~_ViewIcon = 159
Print "*** pruefe: " & sendto
If (InStr(sendto, "@altedomain") > 0) Then
formula = |@ReplaceSubstring("| & sendto & |" ; "@altedomain" ; "@neuedomain")|
newsendto = Evaluate(formula)
Call newemail.Replaceitemvalue("SendTo", newsendto)
Call newemail.Save(True, False)
Print "*** gefunden! Ersetze!"
End If
Set newemail = doccol.getnextdocument(newemail)
Wend
doccol.Updateall
--- Ende Code ---
JayDee:
Mit welchen Rechten / welchem Signer läuft denn der Agent?
Die Konsole ist zu den "Verpassten Alarmen" (Glockensymbol) gewandert
schroederk:
Der Signer ist aktuell auch der Eigentümer der Datenbank und hat aktuell Managerrechte.
Ich hab Ausgaben von einem anderen Agent unter dem Glockensymbol und dort unter Status gefunden.
Tode:
Eine Ausgabe eines Agenten "Nach Eingang neuer Mail" findest Du aber nicht am Client, sondern nur in der Server- Console.
jBubbleBoy:
--- Code: ---sendto = newemail.SendTo
--- Ende Code ---
diese Zeile ist fehlerhaft und führt zu einem Abbruch des Agenten
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln