DominoArea.org [Archive]

Bonjour,
j'ai du mal à supprimer l’icône liée a un fichier dans un champ Richtext.
D'après la technote d'IBM il faut procéder ainsi:

Code : Tout sélectionner

Set rtitem=doc.GetFirstItem("Body")
      Forall o In rtitem.EmbeddedObjects
               If(o.Type=EMBED_ATTACHMENT) Then
                  Call o.remove   
               End If
               
            End Forall


Je supprime bien le fichier, mais l’icône persiste.
Auriez vous une petite idée! Merci.
cdt
camille

salut

tu as enregistrer,fermé puis réouvert ton doc apres ?

Salut,
oui, j'ai fait çà en premier connaissant un petit peu le travail avec les richtextItem!
Mais cela ne change rien!
l’icône reste dans dans le champ en Front-end. Je me suis dit alors qu'il suffirait d'effacer le contenu du champ.

Code : Tout sélectionner

Set rtitem=doc.GetFirstItem("Body")
            Forall o In rtitem.EmbeddedObjects
               If(o.Type=EMBED_ATTACHMENT) Then
                  Call o.remove   
               End If
            End Forall
            Call source.FieldSetText("Body","")
            Call doc.Save(True,True)


Et là plus d'icone!
Sinon je n'ai rien trouvé d'autre.
cdt
camille