Yori ch 2.Jul.11 10:47 PM a Web browser Domino Designer6.5.6Windows XP
i'm having a problem to with the code for action button below,once the button has clicked,the msg display that this doc currently unavailable for viewing even current date is not > than xclosure Date. can any1 help to assist?
Dim xClosureDate As NotesDateTime
Dim currentDate As NotesDateTime
Set currentDate= New NotesDateTime("Today")
Set xClosureDate=New NotesDateTime("10-07-2011")
If (currentDate.TimeDifference(xClosureDate) > 0) Then
Msgbox "This doc is currently unavailable for viewing",16,"xDoc"
Exit Sub
End If