怎样通过Delphi来调用Outlook发送任务通知消息？

Question

如何通过Delphi来调用Outlook发送任务通知消息？要实现的是任务到期邮件通知功能

Answer 1

如何使用delphi7开发类似于outlook邮件通知功能的小窗口

Answer 2

可以通过VBA来控制OUTLOOK发邮件。

Answer 3

const olMailItem = 0;
var 
  Outlook: OLEVariant;
  MailItem: Variant;
begin
  try
   Outlook:=GetActiveOleObject('Outlook.Application') ;
  except
   Outlook:=CreateOleObject('Outlook.Application') ;
  end;
  MailItem := Outlook.CreateItem(olMailItem) ;
  with MailItem do 
  begin 
    Recipients.Add('[email protected]') ;
    Subject := 'Subject: Outlook Mail From Delphi';
    Body := 'Welcome to my homepage:http://delphi.about.com';
    Attachments.Add('C:\Windows\Win.ini') ;
    Send;
  end; {with}
  Outlook := Unassigned;
end;

Answer 4

如何在我写的有关任务管理的程序中加入任务到期邮件通知的功能？ outlook