Not really sure what you want to compare, but here’s some code that’s straight from the Designer’s Help file, under “Examples: NotesDateTime Class”
5. This agent gets the value of the PurgeDate item in a document and places it into a NotesDateTime object. The time zone setting of PurgeDate is preserved. For example, if PurgeDate has a value of 03/21/96 04:54:33 PM in Eastern Standard Time, the DateTime object represents 03/21/96 04:54:33 PM and its TimeZone property equals 5.
Dim session As New NotesSession
Dim doc As NotesDocument
Dim item As NotesItem
Dim dt As NotesDateTime
Set doc = session.DocumentContext
Set item = doc.GetFirstItem(“PurgeDate”)
Set dt = item.DateTimeValue
Messagebox dt.LocalTime & ” TZ” & dt.TimeZone,, “Local time”
Combine the concepts from the above with the use of the .TimeDifference or .TimeDifferenceDouble methods of the class (also explained in the Designer’s Help file), and you should be able to do what you want.
diff = td1.TimeDifference( td2 )