Examples: Log property

This example parses a rich text item from a document and displays parsing error from the log.

Sub Initialize
  On Error Goto errh
  Dim session As New NotesSession
  Dim domParser As NotesDOMParser
  Dim doc As NotesDocument
  Set doc = session.DocumentContext
  Dim item As NotesRichTextItem
  Set item = doc.GetFirstItem ("Body")
  Set domParser = session.CreateDOMParser(item)
  domParser.ExitOnFirstFatalError = True
  Msgbox "Parsing completed."
  Exit Sub
  Msgbox domParser.log
End Sub