Examples: SetNow method
- 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 - 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 )