Force a page

HCL Domino Domino Forum
1

Is it possible to create a document, in email, that the users cannot close unless they have clicked on a button contained within that page/document? If so how is this done?

2

Subject: Force a page

Put some conditions into a queryclose event…or if you only want it to apply when saving, then in the querysave event…something like this:

Sub Queryclose(Source As Notesuidocument, Continue As Variant)

Dim workspace As New NotesUIWorkspace

Dim session As New NotesSession

Dim userName As New NotesName(Session.userName) 

Dim addressedYet As String

Dim doc As NotesDocument



Set doc = Source.Document



addressedYet = Source.FieldGetText("assignedReviewed")	

If source.FieldGetText("Status") = "Assigned" And addressedYet <> "Yes" And (source.FieldGetText("whoIsAssigned") = userName.common) And (source.FieldGetText("dateToAddress") = "") Then

	Messagebox _

	"You have been assigned this task. You cannot close it without entering the date it will be addressed.", 0 + 16, "Error"

	Source.EditMode = True		

	Call Source.GotoField("dateToAddress")

	Continue = False		

Else		

	Call saveSupport(workspace, session)		

End If

End Sub