Cherche un agent Lotus pour gérer la fin de parution

[Patrick@cpln]

Bonjour, je cherche un agent Lotus pour gérer la fin de parution. (A une date x le document est automatiquement effacé et pas archivé). Dans le masque de saisie,... j'ai inclu un champ date de fin!!!Même une ébauche peut m'être utile...Merci de votre aide !!!

[Raziel]

Salut,Tu peux essayé un truc dans le genre im Session As New notessessionDim db As notesdatabaseDim DocCol As notesdocumentcollection Dim Formule As String Set db = Session.currentdatabaseFormule = "Select Form = 'Nom de mon masque' & DateFin< @date(@now)" Set DocCol = db.search(Formule, Nothing, 0)If DocCol.count <> 0 Then Call DocCol.removeall(True)DateFin doit être un champ de type DATE. Dans le cas contraire, faire un @texttotime(DateFin)