不想让用户自己输入邮件内容,且自动带上附件。可以实现吗?
注意:不是OFFICE 2000中的那个,而是WINDOWS自带的。

解决方案 »

  1.   

    用这个调用不行吗?shellexecute();
      

  2.   

    realist(现实):我只能用shellexecute()简单的把OUTLOOK调出,而不能自动填写,请举个例子。
      

  3.   

    procedure TForm1.Button1Click(Sender: TObject);
    var MI: MailItem;
    Insp: Inspector;
    begin
    MI := OutlookApplication1.CreateItem(olMailItem) as MailItem;
    MI.Recipients.Add('[email protected]');
    MI.Attachments.Add('c:\aa.xls',EmptyParam,EmptyParam,'aa');
    MI.Subject := 'test';
    MI.Body := 'HELLO';
    MI.Send;
    end;
      

  4.   

    同意上楼上的,
    建议你看看Delphi4入门与精通中的邮件编程吧。
      

  5.   

    takdick(dick)的必须要用户安装OFFICE2000才行,用INDY也好实现。
    当我想直接用Windows自带的算了。
    曾经看了一个用VB编的软件实现了的,我想DELPHI也是可以实现的