Hallo
Ich habe das Problem das die Notesclients immer ungefragt die Empfangsbestätigung zurücksenden. Kann man das automatische senden deaktivieren ( Ich meine: er soll mich fragen ob ich die Empfangsbestätigung senden will (In Outlook kann man das)).
Wir haben folgende Client versionen 4.6 und 5.0.5. (Ich weiß das diese Versionen schon ziemlich alt sind)
Gruß Sven.
P.S. Ich habe keinen zugriff auf den Notes-server. Ich bin nur Anwender.
Moin Moin!
Das geht, aber dazu muss man die Mail-Schablone manipulieren (meint ein paar Zeilen Code einfügen) und ich bin mir nicht sicher, ob das der normale Nutzer darf.
Ups, mir fällt gerade ein, dass du dafür vermutlich den Designer-Client benötigst.
Falls trotzdem Interesse besteht, kann ich den Code ja mal posten.
Hallo Michael,
der Code würde mich auch interessieren. Wir setzen inzwischen Notes 7 ein. Und ich habe den Designer installiert und da auch schon selbst das ein und andere ausprobiert.
Gruß Kajakcat
Code:
Dieses Script muß in den QueryOpen event in der Memo Maske.
Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As
Variant, Continue As Variant)
Set uidoc = Source
Set cMemoObject = New UIMemoDocument
Call cMemoObject.Init(Source,Isnewdoc)
Set doc = Source.document
If uidoc.IsNewDoc Then
’ don’t do anything, as this is a new document …
Else
RR = doc.GetItemValue(„ReturnReceipt“)
If RR(0) = „1“ Then
boxType& = MB_YESNO
answer% = Messagebox(" Möchten sie diese schicken? (Nein,
unterdrückt eine Empfangsbestätigung)",boxType&, „Diese Nachricht
enthält eine Empfangsbestätigung!“ )
If answer% = 7 Then
’ determine if the user would like to return the receipt
doc.ReturnReceipt = „0“
Messagebox(„Empfangsbestätigung deaktiviert. Es wird keine
Nachricht versendet“)
'Call doc.save (True, True) enable this if you want to totally disable
'RR on this message;
End If
End If
End If
End Sub
Gruß
Michael