Examples: SetNow method

  1. This script creates a new NotesDateTime object with the default date, and then resets it to the current date and time. For example, if the SetNow method executes at 8:04:04 PM on August 15, 1996, then dateTime represents 08/15/96 08:04:04 PM.
    Dim dateTime As New NotesDateTime( "" )
    Call dateTime.SetNow
  2. This script sets the PurgeDate item in a document to two months from now. For example, if the SetNow method executes at 8:04:04 PM on August 15, 1996, then PurgeDate has a value of 10/15/96 8:04:04 PM.
    Dim doc As NotesDocument
    '...set value of doc...
    Dim dateTime As New NotesDateTime( "" )
    Call dateTime.SetNow
    Call dateTime.AdjustMonth( 2 )
    Set doc.PurgeDate = dateTime
    Call doc.Save( True, True )