DominoArea.org [Archive]

Bonjour je voudrais applique ruen couleur dans mon champ mais le code ci_joint ne marche pas

Dim bodyItem As NotesRichTextItem 'Variant
Dim bodyStyle As NotesRichTextStyle
Dim docp As NotesDocument

Set bodyStyle = session .CreateRichTextStyle
Set bodyItem = docp.GetFirstItem("Description")
bodyStyle.NotesColor = COLOR_BLUE
Call bodyItem.AppendStyle(bodyStyle)
Call bodyItem.AppendText(" 000000testst")

en Sortie je n'ai pas la couleur bleu mais toujours du noir

juste pour être sur, ton champ est bien de type RichText ? tu ne travailles pas en FrontEnd, tu travailles en BackEnd, tu sauves et tu ouvres ton doc ensuite pour voir la modif ?

rien ne passe

Vérifier le champ texte riche, lors de la création d'un document en LS, c'est un champ de type texte si on n'ajoute pas de fioriture, etc... par contre si l'utilisateur créé le document à la main met des fioritures (pièces jointes, polices, etc.... c'est un champ texte riche, donc vérifier cela