编程如何调用OutLook发送邮件? 并且把当前的Html格式的邮件,作为邮件内容显示在内容框中.有谁知道的? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 DELPHI里调用Outlook const olMailItem = 0;var Outlook: OLEVariant;MailItem: Variant;begintryOutlook := GetActiveOleObject('Outlook.Application');exceptOutlook := CreateOleObject('Outlook.Application');end;MailItem := Outlook.CreateItem(olMailItem);MailItem.Recipients.Add('[email protected]');MailItem.Subject := 'your subject';MailItem.Body := 'http://kingron.myetang.com';MailItem.Attachments.Add('C:.dat');MailItem.Send; Oulook := Unassigned;end;*************************发送HTML格式邮件下面的代码没有测试,因为我没有Outlook,而我又找不到Outlook express的CLSID或者ProgID…… :-(varOe,MI:OleVariant;beginOe:=CreateOleObject('Outlook.Application');MI:=Oe.CreateItem(0);MI.Subject:='subject';MI.HTMLBody:='<html>..Input your HTML Source Here....</html>';MI.Recipients.Add('Mail address like :[email protected]');MI.Send;MI:=Unassigned;OE:=Unassigned;end; delphi 如何选中Excel所有单元格然后设置整个Excel的字体属性? 身为程序员。你不得不看!!! 发邮件,虽然是老问题,查了N多帖子,问题还是解决不了,郁闷啊…… 哪位大哥大姐知道VC写的DLL,用Delphi来调用有什么讲究吗? 请问如何将已存储的QuickRep的.qrp打印文件导入到QuickRep中打印? 如何得到客户端ip地址? 如何给DBGRID增加这样的列? 请教高手一个SQL语句 一个权限问题,一定给分,不管怎么样先近来看看再说吧 delphi dbgrid列的拖動 時間問題 在線等 谁知道GHOST是用什么语言做出来的吗,
const olMailItem = 0;var Outlook: OLEVariant;MailItem: Variant;begintryOutlook := GetActiveOleObject('Outlook.Application');exceptOutlook := CreateOleObject('Outlook.Application');end;MailItem := Outlook.CreateItem(olMailItem);MailItem.Recipients.Add('[email protected]');MailItem.Subject := 'your subject';MailItem.Body := 'http://kingron.myetang.com';MailItem.Attachments.Add('C:.dat');MailItem.Send; Oulook := Unassigned;end;*************************发送HTML格式邮件下面的代码没有测试,因为我没有Outlook,而我又找不到Outlook express的CLSID或者ProgID…… :-(varOe,MI:OleVariant;beginOe:=CreateOleObject('Outlook.Application');MI:=Oe.CreateItem(0);MI.Subject:='subject';MI.HTMLBody:='<html>..Input your HTML Source Here....</html>';MI.Recipients.Add('Mail address like :[email protected]');MI.Send;MI:=Unassigned;OE:=Unassigned;end;