Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

One-Off Addressing Using MAPI

Status
Not open for further replies.

MichaelWates

Programmer
Jan 12, 2000
1
GB
Hi there,<br>
We have a need for our C++ / VB code to create mail using Notes. When we follow the normal process for this we get &quot;No Transport Provider Was Available For Delivery to this recipient&quot;. Lotus say that this is because the MAPI interface does not support one-off addressing. This implies that we can only send to people we know are in the address book.<br>
They offer a workaround by putting &quot;NOTES:&quot; in front of the email address, ie NOTES:<A HREF="mailto:fred@xxx.com">fred@xxx.com</A>. This does not appear to work. Has anybody out there successfully done something like this, and if so how?<br>
<br>
Regards<br>
Michael Wates
 
I have successfully sent email via Lotus Notes from Access 97/2000 using a small piece of VBcode... I hope this helps..<br>
<br>
Set s = CreateObject(&quot;Notes.Notessession&quot;) 'create notes session<br>
Set db = s.GetDatabase(&quot;&quot;, &quot;c:\data\notes\names.nsf&quot;) ' work<br>
<br>
Set doc = db.createdocument<br>
msg = &quot;message body&quot;<br>
<br>
doc.sendto = <A HREF="mailto:joe.bloggs@email.address.co.uk">joe.bloggs@email.address.co.uk</A><br>
<br>
subj = &quot;Subject&quot;<br>
<br>
Call doc.replaceitemvalue(&quot;Subject&quot;, subj)<br>
Call doc.replaceitemvalue(&quot;Body&quot;, msg)<br>
<br>
<br>
<br>
Call doc.Send(False) Set s = Nothing <br>
' close connection to free memory<br>
<br>

 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top