DominoArea.org [Archive]

bonjour

je voudrais selectionner un mail depuis une vue,
modifier l'objet en ajoutant du texte,
et le classer dans un dossier.

j'ai essayé le code suivant mais sans succès
Le mail se classe bien mais l'objet du mail n'est pas modifié
Pourriez vous m'aider ?

Sub Initialize()

'DEFINI DOC COMME ETANT LE DOCUMENT COURANT
Dim Session As New NotesSession
Dim doc As NotesDocument
Set doc = session.DocumentContext


'CHANGE L OBJET DU MAIL
Call Doc.Replaceitemvalue("Subject", "Nouvel Objet")


'PLACE LE MAIL SELECTIONNE DANS LE DOSSIER
'SUPPRIME LE MAIL SELECTIONNE DU DOSSIER COURRIER EN ARRIVE
Call doc.PutInFolder( "Dossier" )
Call doc.RemoveFromFolder( "($Inbox)" )


End Sub

doc.save(true,true) ?!!

salut

il faut faire un save sinon ta modif ne sera pas prise en compte

Call Doc.Replaceitemvalue("Subject", "Nouvel Objet")
call doc.save(true,false)

Merci beaucoup c'est parfait comme ca