Wir prüfen es wie im Codeschnipsel unten, da sich NotesDocument.Items...
1) ...als zu inperformant herausgestellt hat. (Hier muss wohl intern das Array aufwändig aufgebaut werden)
2) ein Zugriff auf doc.items alle MIME-Felder auf Richtext konvertiert, falls man zuvor nicht sichergestellt hat, dass die MIME Konvertierung aus ist
Public Function docIsValid(doc As NotesDocument) As Integer
If doc Is Nothing Then Exit Function
'If doc.Isdeleted Then Exit Function ' inperformant, kommuniziert immer mit dem Server und fragt den aktuellen Zustand ab!
If doc.Universalid = "" Then Exit Function
docIsValid = doc.isValid ' docIsValid liefert den Zustand beim Laden des Dokuments (und nicht den aktuellen wie doc.isDeleted)
End Function
Gruß
Roland