Domino 9 und frühere Versionen > ND6: Entwicklung

"Email-Absender", "Gesendet am" und "Thema" kopieren

<< < (4/4)

Semeaphoros:
Uh

Entweder

@Command( [EditRight]; "1" );

oder

@PostedCommand( [EditRight]; "1" );

Auch da wäre ein Blick in die Hilfe unter @PostedCommand ganz nützlich gewesen.

koehlerbv:

--- Zitat von: Bruce Willis am 11.07.04 - 21:56:28 ---Hallo Bernhard,

willst Du in der Tat, dass ich Dir den Sinn eröffne?
 :)

Gruß
Bruce

--- Ende Zitat ---

Nö, eher weniger. Tut nicht not, wirklich nicht ;D

Bernhard

Bruce Willis:
Hallo Semeaphoros,

vielen Dank für Dein Verständnis!
 :-*

Dies unten funktioniert!!!

@PostedCommand( [EditRight]; "1" );
@PostedCommand([EditInsertText]; @NewLine)

Bruce Willis:
Hallo,

VIELEN DANK AN DIE BESTEN NOTES DEVELOPER:

Driri, Glombi, TMC, Koehlerbv, Semeaphoros

Alles funktioniert perfekt!!!

Gruß
Bruce

***************
Für alle interessierten Forum-Besucher: anbei ist der Code, der die Email-Verknüpfung (DocLink) zu einer E-Mail übers Auswahl-Fenster erzeugt und einen ähnlichen Text aus der E-Mail kopiert:

17.06.2004 16:44  =>   Bruce Willis  =>   Arni  =>   Terminator-4  => [DocLink]

Also:

1. Eine separate Standard-View "(ViewRelations)" mit mehreren Spalten erstellt, eine Spalte "IDnum" mit der Formel @Text(@DocumentUniqueID) ganz vorne hinzugefügt.

2. Eine leere View "(ViewRelationsOne)" erstellt, eine Spalte "IDnumOne" mit der Formel @Text(@DocumentUniqueID) ganz vorne eingefügt (aufsteigend sortiert). Die Option "Show response documents in a hierarchy" (Ansichtseigenschaften, 2. Reiter) ausgeschaltet.

3. In der Maske "Aufgabe" eine neue Aktion mit dem u.g. Code erstellt:

_Server := @Subset (@DbName; 1);
_ViewUNID := "(ViewRelationsOne)";
_ViewAnzeige := "(ViewRelations)";
_unid := @PickList([Custom]:[Single];"":"";_ViewAnzeige; "Auswahl";"E-Mail zum Verknüpfen";1);
_Server := @Subset (@DbName; 1);
_Datenbank := @Subset (@DbName; -1);

_sent := @DbLookup("":"NoCache";_Server : _Datenbank; _ViewUNID; _unid; "PostedDate");
_sender := @DbLookup("":"NoCache";_Server : _Datenbank; _ViewUNID; _unid; "From");
_sentTo := @DbLookup("":"NoCache";_Server : _Datenbank; _ViewUNID; _unid; "SendTo");
_subject := @DbLookup("":"NoCache";_Server :_Datenbank; _ViewUNID; _unid; "Subject");

@Command([EditInsertText];@Text(_sent;"D0T1") + "  =>   ");
@Command([EditInsertText];@Name([CN]; _sender) + "  =>   ");
@Command([EditInsertText];@Name([CN]; _sentTo )+ "  =>   ");
@Command([EditInsertText]; _subject + "  => ");

@Command([FileOpenDatabase];_Server : _Datenbank ;_ViewUNID;_unid;"1";"1"); @Command([EditMakeDocLink]);
@Command([FileCloseWindow]);
@PostedCommand([EditPaste]);

@PostedCommand( [EditRight]; "1" );
@PostedCommand([EditInsertText]; @NewLine)


4. In der DB muss eine "Default View" vorhanden sein

Navigation

[0] Themen-Index

[*] Vorherige Sete