re,
malheureusement avec les champ richtext on ne peut travail en back-end dessus qu'une fois enregistré
When you change the value of a NotesRichTextItem object, the change is not written to disk until you call the Save method for the parent NotesDocument.
kochiz a écrit:Bonjour,
Dans l'aide du DESIGNER de la classe NotesRichTextItem:When you change the value of a NotesRichTextItem object, the change is not written to disk until you call the Save method for the parent NotesDocument.
Peut être par des variables globales dont la valeur change sur l'évenement Exiting tu pourrais choper quelques chose
lebanner a écrit:
Le problème c'est que je ne veux pas que le document soit enregistré si les deux champs en question en contienne pas de fichier attaché
hippostef a écrit:lebanner a écrit:
Le problème c'est que je ne veux pas que le document soit enregistré si les deux champs en question en contienne pas de fichier attaché
Etant donne que seulement une fois le document enregistre, tu ne peux tester le rtiem et si je reste sur mon idee d'enregistrement, tu ajoute un petit flag qui permet de savoir si le document a ete au bout de sa validation (test presence fichier + enregistrement) et tu n'affiches dans les vues que ces derniers et tu fais un agent programme qui supprime les documents qui ont ete abandonnes (mais quand meme enregistres).
RagDam a écrit:Bonjour,
Pour mon premier post sur ce forum que je consulte très regulièrement, cela sera pour aider ou en tous les cas donner quelques pistes.
Je pense que commencer comme cela me profitera sans doute
Pour répondre à ta question et en l'occurence pour vérifier l'existence d'un attachement dans un champ Rich Text spécifique et AVANT enregistrement du document, il faut utiliser la méthode Refresh avec le paramètre True.
' Actualiser les bodys
Source.refresh(True)
' Instancier le doc
Set Doc = Source.Document
Set rItem = Doc.GetfirstItem("Ton RTItem Toto")
If Not rItem Is Nothing Then
HasAttach = Isarray(rItem.EmbeddedObjects)
End If
if HasAttach = False
MsgBox "Champ Toto" non renseigné
end if
Normalement ça marche
Bon We