Examples: OpenIfModified method

This script opens SALES.NSF on the server Paris, if the database has been modified since January 20, 1995.

Dim db As NotesDatabase
Dim dateTime As NotesDateTime
Set db = New NotesDatabase( "", "" )
Set dateTime = New NotesDateTime( "01/20/95" )
If db.OpenIfModified( "Paris", "sales.nsf", _
dateTime ) Then
  Messagebox( db.Title & " has been modified since " &  _
  dateTime.LocalTime ) 
Else
  Messagebox( "Database not modified since date specified." )
End If