Regeln, die in Notes R5 und höher erstellt werden bleiben möglicherweise nach dem Löschen aktiviert, wenn Sie nicht vor dem Löschen deaktiviert wurden.
Mit einem kleinen Agent in der Maildatenbank kann man dieses Problem beheben:
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim server As String
Dim filepath As String
server = "Servername"
' enter the server name
filepath = "Filepath"
' enter the path to the database
REM Set db = New NotesDatabase( server, filepath )
Set db = session.CurrentDatabase
Print db.Title
Set doc = db.GetProfileDocument( "CalendarProfile"; )
Call doc.RemoveItem( "$FilterFormula_0" )
REM Call doc.RemoveItem( "$FilterFormula_1" )
REM Call doc.RemoveItem( "$FilterFormula_2" )
Call doc.ReplaceItemValue( "$FilterFormulaCount","0" )
Call doc.Save( True, False )
End Sub
Die Lösung wurde mir bereits 2005 in einer Newsgroup genannt worden, und ich hatte vergessen wie es ging. Der ursprüngliche Newsthread mit meiner Frage kann HIER nachgelesen werden.