petit probleme de Regle

[fripouille76]

Bonjour tout le monde.

J'ai pour un utilisateur , un probleme sur le fonctionnement d'une règle.
L'utilisateur en question avait créer une regle pour que les mails en arrivé se place directement dans un dossier rDV.

L'utilisateur a depuis supprimer sa regle..mais elle s'applique toujours. Tout les nouveaux mails vont toujours se placer dans son dossier bien que la regle soit supprimer...???

Nous avons actualiser la conception du modele de la BAl , mais ca n'as pas résolu le probleme.

Avez vous une idée sur comment résoudre ce probleme ???
Merci de votre aide....

[cyberscooty]

J'avais le même soucis j'ai trouvé la solution sur ce site ....

Il faut créé un bouton dans un mail (création>zone sensible>bouton)


dans la liste déroulante choisir Lotus Script puis copier collé le code ci dessous

Le bouton désactive TOUTES les règles (visible et non visible) puis te demande ensuite de réactiver celle que tu veux

Code : Tout sélectionner

Sub Click(Source As Button)
   
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim workspace As New NotesUIWorkspace
   Dim folder As NotesView
   
   Set db = session.currentdatabase
   Set folder = db.GetView("(Rules)")
   
'Trouver le document "(Calendar profile)" dans la base
   Dim calendarProfile As NotesDocument
   Set calendarProfile = db.GetProfileDocument( "CalendarProfile" )
   
'LEs règles sont conpilés dans un champs nommé $FilterFormula_xx xx représente un OrderNum
'On retire les champs du "(Calendar profile)"
   Forall item In calendarProfile.Items
      If( Lcase$(Left$(item.Name,15)) = "$filterformula_" ) Then
         Print "Cleanup " & item.Name
         Call item.Remove
      End If
   End Forall
   
'Enregistrer les changements du "(Calendar profile)"
   Call calendarProfile.Save( False, False )
   
'Désactiver toutes les règles visibles ou non.
   Dim mailrule As NotesDocument
   Set mailrule = folder.GetFirstDocument
   While Not( mailrule Is Nothing )
      Call mailrule.ReplaceItemValue( "Enable","0" )
      Call mailrule.Save( True,False,True )
      
      Set mailrule = folder.GetNextDocument( mailrule )
   Wend
   
'Ouvrir le dossier Règles poru que l'usager réactive seulement celle qui sont nécessaires
   Call workspace.OpenDatabase( db.Server, db.FilePath, "(Rules)" )
   
   Messagebox "Mise-à-jour terminée, veuillez réactiver les règles s'il y a lieu."
   
   
End Sub

[fripouille76]

Nickel ca a regler le probleme chez moi egalement,

Je te remercie...pleinement

[AUGER]

Merci pour le script.

J'avais des régles qui restaient actives même après suppression. Maintenant tout fonctionne.

[Sylvain-PEPIN]

Salut,

il faut penser à les désactiver avant de leur faire la peau, sinon....

[YoGi]

essaye ça :



... désolé, pas pu m'empêcher.

[Sylvain-PEPIN]

ok, tu sors ....

[Michael DELIQUE]

il est limite ton humour Yogi...

[cris]

et dans le cas d'une règle qu'on a crée directement sur le serveur domino?

merci d'avance

[Jérome Deniau]

Sur le serveur, ouvrir le doc de configuration, onglet règles puis une fois enregistré on force sur la console:

set rules

[TBigJohn]

Bonjour,

je remonte cet ancien poste car j'ai le prbl d'une rule restée enable sur un server 8.5.1 ( client 8.5.1 ) et visiblement pour moi le code n'a pas fonctionné.

Il désactive bien les rules existantes mais la rule effacée fonctionne toujours ....

Delete du calendar profile ne fonctionne pas non plus ...

Merci,

[TBigJohn]

Bonjour,

je remonte cet ancien poste car j'ai le prbl d'une rule restée enable sur un server 8.5.1 ( client 8.5.1 ) et visiblement pour moi le code n'a pas fonctionné.

Il désactive bien les rules existantes mais la rule effacée fonctionne toujours ....

Delete du calendar profile ne fonctionne pas non plus ...

Merci,

[TBigJohn]

c'est réglé avec un petit res ser .. bizarre quand meme ...