LOTUSSCRIPT/COM/OLE CLASSES
Sub Initialize Dim dateTime As New NotesDateTime( "" ) dateTime.LSLocalTime = Now Messagebox _ "Date: " & dateTime.DateOnly & Chr(10) & _ "Time: " & dateTime.TimeOnly,, "Current date and time" End Sub
See Also