.

HCLSoftware Business Partner
Domino Consulting Services
CRUCIAL Notes Tools
+1 212-599-2048

Domino Consulting Services
CRUCIAL Notes Tools
Domino administration
Notes development

Facebook Twitter YouTube
Chat now       
.
ProductsDownloadsNewsAbout usContact


Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: ConvertToZone method
This code converts today at 6:00 AM to all the time zones using daylight-saving time.

Sub Initialize
 Dim dateTime As New NotesDateTime("Today 06:00")
 msg = "Zone" & Chr(9) + "Time"
 For i = -12 To 12
   Call dateTime.ConvertToZone(i, True)
   msg = msg & Chr(10) & dateTime.TimeZone & Chr(9) &  _
   dateTime.ZoneTime
 Next
 Messagebox msg,, "Today 06:00 DST"
End Sub

See Also