Examples: IsValid property (NotesDocument - LotusScript®)

This example retrieves a document, then it checks to see whether or not the document is valid.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim entry As NotesviewEntry
Dim vc As NotesViewEntryCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view = db.GetView("By Category")
Set vc = view.GetAllEntriesByKey("Cars")
Set entry = vc.GetFirstEntry()
Set doc = entry.document
If doc.IsValid = True Then
  Messagebox "This document is valid."
Else
  Messagebox "This document is not valid."
End If