Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Darkface am 13.03.03 - 10:34:11

Titel: Dokument verlinkt senden
Beitrag von: Darkface am 13.03.03 - 10:34:11

Hallo Forum,
ich habe ein Dokument und möchte eine InfoMail an eine Person senden. In dieser Mail möchte ich dann die Felder:
Subject, Body füllen. Im Body soll dann die Verlinkung eingefügt werden.

Danke für jede Hilfe.

Gruß
  Darkface

Titel: Re:Dokument verlinkt senden
Beitrag von: klaussal am 13.03.03 - 10:56:10

... aus der designer-hilfe:

Dim session As New NotesSession
Dim db As NotesDatabase
Dim newDoc As NotesDocument
Dim rtitem As NotesRichTextItem
Set db = session.CurrentDatabase
Set newDoc = New NotesDocument( db )
Set rtitem = New NotesRichTextItem( newDoc, "Body" )
Call rtitem.AppendDocLink( db, db.Title )
newDoc.Subject = "Here is a link to the database"
newDoc.SendTo = "Lauri Nodwell"
newDoc.Send( False )

Titel: Re:Dokument verlinkt senden
Beitrag von: seerow am 13.03.03 - 13:23:48

Hi,

so geht es auch......

@MailSend("user1":"user2";"user3";"";"Subject"; "Bitte klicken Sie auf den Link:";""; [IncludeDoclink] : [ReturnReceipt] : [DeliveryReportConfirmed]);
@Command([FileSave]);
@Command([FileCloseWindow])

Viel Spass  ;)

Titel: Re:Dokument verlinkt senden
Beitrag von: Wipe am 13.03.03 - 14:21:25

oder so


In einen Aktionsbutton.

@Command([EditMakeDocLink]);
@Command([MailComposeMemo]);
@PostedCommand([EditGotoField];"Subject");
@PostedCommand([EditInsertText];dspSubject);
@PostedCommand([EditGotoField];"Body");
@PostedCommand([EditInsertText];"Verknüpfung mit dem Dokument ==>");
@PostedCommand([EditPaste])