If there is one option I am not Happy about from Lotus Notes is the option to be prompted to accept or deny the Return Receipt.
Can anyone descibe how to setup an option to Disable the Return Receipt or at least be prompted to acknowledge or Deny the Return Receipt.
Many Regards,
Robert
Subject: Need further assistance
Wilhelm,
Can you provide a little more detail as to how you add the scripts within Notes and how to add the column. I have added a temporary script within version 7 but I am at a lost with version 8.5.
Robert
Subject: further little help …
to ad 1.).) open your mailfile or template in designer-client
.) open inbox-folder
.) add a column e.g. before the size-row (use insert column-icon)
.) put the formula I´ve posted into the formula-section of this column and on the properties of the column select show content as icon (2nd checkbox from top; I use a german client, therefore I don´t know exactly the words in the english form.
.) save inbox-folder and “ad 1.)” is done.
to ad 2.)
.) in the designer-client go to the forms-section of your mail-file/template an on the left-down-side of programming-pane see the object or event “post open” in the memo(form) and in the formula-section of this post-open-event put the 2nd part of code I´ve written in my posting before.
.) save the memo-form and y´re finished
this post-open-event works only in the notes-client if a mail with the flag returnreceipt=1 is going to be opened and asks you what to do.
Pleas excuse my partly mis-understandable wording, but - as I said - I´m using german clients and therefore I can´t tell you the english wording of the form or folder.
have a nice try …
wilhelm
ps: you may also contact me directly at “wh(at)spw.at” if necessary.
Subject: Suppress and/or ask for sending Returnreceipt
to do - 1.):if an incoming mail requests a return receipt, there is a field, called “ReturnReceipt”.
You can add a row in your inbox to see if an email contains the field ReturnReceipt as shown in the following example:
@If(ReturnReceipt=“1”;56;“”)
to do - 2.):
After that you can work on your memo-form in the “query open - event” with the following code:
start of code →
Dim uidoc As NotesUIDocument
Set uidoc = Source
Dim doc As NotesDocument
Set doc = Source.document
If uidoc.IsNewDoc Then
’ don’t do anything, as this is a new document …
Else
If doc.GetItemValue("ReturnReceipt")(0) = "1" Then
Dim answer As Integer
answer% = Messagebox("Send ReturnReceipt NOW?", 36, "ReturnReceipt" )
If answer% = 7 Then
' determine if the user would like to return the receipt
doc.ReturnReceipt = "0"
' Should the ReturnReceipt for THIS Mail be suppressed permanently?|
Dim answer2 As Integer
answer2% = Messagebox("Should the ReturnReceipt for THIS Mail be suppressed permanently?", 36, "ReturnReceipt will be suppressed temporary, NO ReturnReceipt will be sent NOW!")
' answer2% = Messagebox(twoliner, boxType&, "Hint & Question")
If answer2% = 6 Then
' enable this if you want to totally disable RR on this message
Call doc.save (True, True)
End If
End If
End If
End If
← end of code
This works fine even on v7-templates …
Hope this helps
Wilhelm