Return Reciept

Hi,

I am trying to work on disabling the Return Reciepts. I want to have the control, as to who should get the return reciept and who should not, once I open the mail, like in Outlook. Is there a way we can set it up…??

Please advice.

Thanks

Garg Alok

Subject: I´m not an developer at all…

…but prev I used this little script, dont know if it helps.Might be other solutions…

Sub Queryopendocument(Source As Notesuiview, Continue As Variant)

Dim sess As New NotesSession     

Dim docs As NotesDocumentCollection

Dim doc As NotesDocument

Set docs = Source.Documents

Set doc = docs.GetFirstDocument()

If doc.principal(0)=sess.UserName Then End

If doc.ReturnReceipt(0) = "1" Then

	resp%=Messagebox("Do you wish to send a receipt?",0+4+16,"Return Receipt Detected!")

	If resp%=7 Then

		Call doc.ReplaceItemValue("ReturnReceipt","0")

		Call doc.Save(True,True)     

	End If

End If    

End Sub

Subject: I am a novice

Hi,

I tried to run this as an agent… and it does not seems to be working… Please guide…