如何在outlook的正文中加入图片（不是在附件中加入图片），高分相送！

Question

对不起，我没有说清楚，我是要用delphi实现，请继续GZ。

Answer 1

转贴Kingron的方法：const olMailItem = 0; 
var 
     Outlook: OLEVariant; 
     MailItem: Variant; 
begin 
  try 
    Outlook := GetActiveOleObject('Outlook.Application'); 
  except 
    Outlook := CreateOleObject('Outlook.Application'); 
  end; 
  MailItem := Outlook.CreateItem(olMailItem); 
  MailItem.Recipients.Add('[email protected]'); 
  MailItem.Subject := 'your subject'; 
  MailItem.Body := 'Your Body Text'; 
  MailItem.Attachments.Add('Your Picture FileName'); 
  MailItem.Send; 
  Oulook := Unassigned; 
end; 

Answer 2

to： bob7946(X度空间) 这个方法也不能加入jpg图片，何况运行到
Outlook := GetActiveOleObject('Outlook.Application'); 时就出错，提示
为：‘无效的类别字符串’，请继续关注，谢谢！

Answer 3

OUTLOOK可以发HTML文件的，你把信件内容作成HTML格式的，把图片加到页中，不是很容易实现的么

Answer 4

你要在delphi中实现还是很有困难的，这与网站有关，比如hotmail，就可以，263就不行。给你留个email：[email protected]，有空请联系。