Hi zusammen,

habe da noch ein Script von *Name gelöscht* aus einem Notesforum, womit ihr eine Empfangsbestätigung im Mail deaktivieren könnt, es erfolgt ein Fenster, indem ihr auswählen könnt, ob ihr eine Bestätigung senden wollt, oder nicht. Beim erneuten aufruf der Mail, wird man/frau wieder gefragt. Viel Spaß damit

Hier das Script:

      Tips Summary       Dieses script erzeugt ein pop-up Fenster, indem man auswählen kann, ob eine Empfangsbestätigung geschickt werden soll oder nicht!
  
Dieses Script muß in den QueryOpen event in der Memo Maske.      Code    

   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ß

Robert

Edit Hoshee: Der Name des Scripterstellers wurde auf Anforderung gelöscht.

Ich habe extra danach gesucht, nur auf Grund der Tatsache, das ich es nicht gefunden habe, habe ich es reingestellt.

Robert

Hallo,

es stand schon einmal im Forum
http://www.atnotes.de/index.php?board=6;action=display;threadid=1394;start=0

einfach mal in der Suche unter "returnReceipt" schauen.

Ich hatte damals auch das Script einfach aus dem Forum (hTML) in den Notes Designer kopiert , dieses konnte ich auch nicht speichern.
Das Script war ok ,
musste alle LEERZEICHEN löschen und einiges vom Script nochmals schreiben, SATZ FÜR SATZ.

Dann ging es .

Gruss

Monster

@Wolfgang:

ein dickes Lob für deine Artikelreihe. Oft kommt man selber nicht auf die einfachsten Dinge.  

Zum Thema Return Receipt noch ein paar allemeine Worte.
IMHO hat prinzipiell jeder, der eine Empfangsbestätigung anfordert auch ein Recht, diese zu erhalten. Daher halte ich den Weg, die Bestätigung gänzlich zu unterdrücken für falsch.
Natürlich gibt es auch die User, die jeden Blumengruß mit einer Bestätigung versehen. Das sind in der Regel auch die Leute, die Postkarten aus dem Urlaub per Einschreiben mit Rückschein versenden.
Hier finde ich die Möglichkeit, NACH dem Lesen der Mail zu entscheiden, ob eine Bestätigung gesendet werden soll durchaus für sinnvoll.

eknori

Hi!

Bitte um eine kleine Hilfestellung da ich noch nicht so versiert im Designer bin.

Wo genau muss ich den Code eintragen?
Vielleicht in "Masken-Memo-ReturnReceipt(Feld)-Vorgabewert"

Danke fuer Eure Hilfe

Harry

...
Dieses Script muß in den QueryOpen event in der Memo Maske.
...

Steht doch im ersten Post mit drin.

Ist ja jetzt die grosse Frage ob das sinnvoll ist - wenn z.B. ein Kunde uns eine Mail schreibt und der MA bei uns ist im Urlaub ist dann möchte der Kunde ja auf jeden Fall die Bearbeitung seines Auftrags/Anfrage - von daher darf ja auch eine Empfangsbestätigung ausgelöst werden...

Gruss
Martin

PS:  Da der Scriptcode im QueryOpen ausgelöst wird - heisst beim Öffnen des Dokuments wird das für jeden User ausgelöst. Vielleicht lässt sich das auch umschreiben - die Profi-Programmierer hier wie koehlerbv, jens, eknori, glombi usw...  bekommen das sicherlich hin- den Aufwand rechtfertigt das vermutlich nicht.

Ich selber setzt die Lösung mit der zusätzlichen Spalte ein - per Forumssuche findest Du diese sicherlich. Dann kann ich die Mails lesen (über Weiterleitung öffnen) und wenn ich will die Empfangsbestätigung auslösen...