Domino 9 und frühere Versionen > Administration & Userprobleme

MailSend in LS?

(1/3) > >>

immanuel:
Hallo Freunde

Ich möchte ein Mail mit LS senden. Am besten die gleiche Funktion wie @Mailsend mit dem Doclink. Gibts die Funktion in LS?
Klappt ansonnsten Evaluate mit MailSend gut?

Grüsse
Manuel

koehlerbv:
Siehe die NotesDocument class. Dort gibt es die Send-Methode (incl. Beispiel).

HTH,
Bernhard

Axel:
Hi,

oder siehe NotesUIDocument-Klasse. Auch hier gibt es eine Send-Methode.


Axel

Glombi:
Wenn Du einen Doclink senden willst, musst Du die Send Methode der NotesDocument Klasse verwenden. Für den Doklink brauchst Du noch ein NotesRichTextItem mit der Methode
AddDoclink( ... )

Beispiele dazu gibt es in der Designer Hilfe.

Andreas

immanuel:
Hallo Zusammen!
Vielen Dank!

Ein Beispiel habe ich gefunden, dass mir nützlich ist. Jedoch wird beim Beispiel der Link auf eine DB angehängt und nicht der Link des aktuellen Dokuments. Ich möchte, dass ein Link des Dokuments wo ich gerade bin versendet wird. Wenn ich dies so versuche:

--- Code: ---Dim workspace As New NotesUIWorkspace
Set doc = workspace.CurrentDocument
...
Call rtitem.AppendDocLink( doc, "blabla" )
--- Ende Code ---
Erhalte ich Fehlermeldungen...

Könnt ihr mir da weiterhelfen? Dake

Gruss
Manuel


--- Code: ---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 )
--- Ende Code ---

Navigation

[0] Themen-Index

[#] Nächste Seite