<div>
P.S.:<br />
You can increase the recipient number if you change the paramter definition of the function SendMailMemo:<br />
Function SendMailMemo(sendTo As Variant, _<br />
cc As Variant, _<br />
bcc As Variant, _<br />
subject As String, _<br />
body As String, _<br />
linkTo As NotesDocument) As Integer<br />
<br />
With Variant type you can call as many recipiants as you have:<br />
flag% = SendMailMemo(doc.PersonsIn<wbr />volved, doc.CopyTo, doc.BlindCopyTo, doc.ChangeSubject(0), &quot;Body Text&quot;, doc)<br />
<br />
Simply omit the zeros.<br />
<br />
Try it.<br />
<br />
Regards,<br />
stamp<br />

</div>


P.S.:
You can increase the recipient number if you change the paramter definition of the function SendMailMemo:
Function SendMailMemo(sendTo As Variant, _
cc As Variant, _
bcc As Variant, _
subject As String, _
body As String, _
linkTo As NotesDocument) As Integer

With Variant type you can call as many recipiants as you have:
flag% = SendMailMemo(doc.PersonsInvolved, doc.CopyTo, doc.BlindCopyTo, doc.ChangeSubject(0), "Body Text", doc)

Simply omit the zeros.

Try it.

Regards,
stamp


<div>
<div class="content wysiwyg-content">
How do I mail a message including a link via Scripting in Lotus Notes? The script should be assigned to a Form Action.(R4.5.5)
</div>
</div>


How do I mail a message including a link via Scripting in Lotus Notes? The script should be assigned to a Form Action.(R4.5.5)

Mailing via LotusScript

Lotus Software produced the Lotus 1-2-3 spreadsheet program, and later developed Lotus Notes, a groupware and email system. Following its acquisition by IBM, the Notes and Domino client/server collaborative platform were expanded to include functions such as email, calendars, to-do lists, contacts management, teamrooms, discussion forums, file sharing, microblogging, instant messaging, blogs, and user directories. IBM also release SmartSuite, a comprehensive office suite, and followed that with Symphony, unrelated to the Lotus suite of the same name.