Das Notes Forum

Lotus Notes / Domino Sonstiges => Tipps und Tricks => Thema gestartet von: kloeti am 29.05.02 - 10:13:27

Titel: Return Receipt verhindern ...
Beitrag von: kloeti am 29.05.02 - 10:13:27
Sali zämme ...

Hat einer von Euch ev. ein Script parat, mit dem man den Delivery Receipt verhindern kann?   :P

Gruzz
kloeti
Titel: Re: Return Receipt verhindern ...
Beitrag von: eknori am 29.05.02 - 10:35:43
na logisch.

das hier in einen Agenten gepackt ( nach Eingang neuer Mail )

und schon ist Ruhe  ;D

FIELD ReturnReceipt:= ReturnReceipt;
FIELD Subject:= Subject;
@If(@IsAvailable(ReturnReceipt);
@If(ReturnReceipt = "1";
@Do(
@SetField("ReturnReceipt"; "0");
@SetField("Subject"; "****** INFO: DISABLED \"Return Receipt\" ****** " +
Subject)); ""); "");
SELECT @All
Titel: Re: Return Receipt verhindern ...
Beitrag von: Hardy am 29.05.02 - 10:36:20
Moin,

wie wärs hiermit ?

In das Queryopen der Maildatenbank kopieren.
(Vorhandene Einträge überschreiben!):

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
     Set cMemoObject = New UIMemoDocument        
     Call cMemoObject.Init(Source,Isnewdoc)  
     Set uidoc = Source
     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 ("Der Absender erwartet eine Empfangsbestätigung." + Chr(13) + " >>>> Wollen Sie diese versenden ? ", boxType&, "Empfangsbestätigung ?")
                 If answer% = 7 Then
                       doc.ReturnReceipt="0"
                 End If
           End If
     End If
     
     
End Sub

Wenn ReturnReceipt vorhanden erscheint ein PopUp Fenster mit einer Abfrage

Gruß

Hardy
Titel: Re: Return Receipt verhindern ...
Beitrag von: kloeti am 29.05.02 - 11:28:28
@eknori ... geht ned   :-/

@Hardy ... wo find ich die QueryOpen? Hast Du einen Screenshot, damit ich nix falsch mache?

Grazie  ;D
kloeti
Titel: Re: Return Receipt verhindern ...
Beitrag von: Felix am 29.05.02 - 11:38:50
Hallo kloeti,

Mail DB im Designer öffnen – auf Maske gehen Memo öffnen –
unter dem Punkt Memo (Maske) in den Objekten Queryopen auswählen – Script einkopieren
Fertig

Felix
Titel: Re: Return Receipt verhindern ...
Beitrag von: Hardy am 29.05.02 - 11:47:56
Danke für's Synchronsprechen !  :D


Hardy
Titel: Re: Return Receipt verhindern ...
Beitrag von: Felix am 29.05.02 - 11:49:08
gerngeschehen  ;D :D ;)
Titel: Re: Return Receipt verhindern ...
Beitrag von: kloeti am 29.05.02 - 11:51:55
goil ... es gait  ;D

(http://www.forenkult.de/antiprofi/undecided.gif)
Danke danke danke ...
(http://www.forenkult.de/antiprofi/undecided.gif)
Titel: Re: Return Receipt verhindern ...
Beitrag von: NotesBug am 29.05.02 - 12:53:30
Bitte solche Fragen immer im Problem Forum bringen.

Nachdem die Anwort aber wirklich mehr ein Tip ist lasse ich Sie mal weiterhin hier und verschiebe sie nicht.

NotesBug
Titel: Re: Return Receipt verhindern ...
Beitrag von: Silke am 30.05.02 - 10:59:17
Zitat
Bitte solche Fragen immer im Problem Forum bringen.

Nachdem die Anwort aber wirklich mehr ein Tip ist lasse ich Sie mal weiterhin hier und verschiebe sie nicht.

NotesBug


Ich hatte das Problem vor wenigen Tagen im Entwicklerforum angestossen:
http://www.atnotes.de/cgi-bin/yabb/YaBB.pl?board=002-2;action=display;num=1022489766

Könnte es vielleicht mal eine Mailaktion geben wo nochmal kurz dagelegt wird was tendenziell wo hin soll

Silke  8)