Solved

How to do the email?

Posted on 2001-08-09
2
137 Views
Last Modified: 2010-04-06
I would like to ask how can I do the emai by using the own company server..how to write the program that can call all email to all the person in my contact list..my address book?
0
Comment
Question by:lbseong
2 Comments
 

Accepted Solution

by:
BryGuy earned 50 total points
Comment Utility
Here is a code snip that uses MAPI to recieve the addresses from your address book and places them in a ListBox ... you should be able to modify it for your needs:

...
var
  RecipDesc     : TMapiRecipDesc;
  Recips        : ulong;
  RecipDescs    : PMapiRecipDesc;
  i             : integer;
...

if (MapiAddress (0, 0, 'Select Recipients', 4, '', 0, RecipDesc, 0, 0,
    @Recips, RecipDescs) = SUCCESS_SUCCESS) then
  begin
    for i := 0 to Recips - 1 do
      ListBox1.Items.Append (PMapiRecipDesc(PChar(RecipDescs) + i *
        SizeOf(TMapiRecipDesc))^.lpszAddress);
    MapiFreeBuffer (RecipDescs);
  end;

As for sending the mail - there are many methods... SMTP, you can get the direct MX address for SMTP server(s), use MAPI to send, etc...

Bryan Ashby
0
 

Author Comment

by:lbseong
Comment Utility
let said i would like to call the email function in one system,can it be done?
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
This video shows how to remove a single email address from the Outlook 2010 Auto Suggestion memory. NOTE: For Outlook 2016 and 2013 perform the exact same steps. Open a new email: Click the New email button in Outlook. Start typing the address: …
This video demonstrates how to create an example email signature rule for a department in a company using CodeTwo Exchange Rules. The signature will be inserted beneath users' latest emails in conversations and will be displayed in users' Sent Items…

743 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

14 Experts available now in Live!

Get 1:1 Help Now