delphi 发送html邮件,delphi – 以HTML格式发送电子邮件

目前我们正在使用MAPI从我们的应用程序发送纯文本电子邮件.当用户调用此函数时,我们指定对话框标志,以便电子邮件将显示在他们的电子邮件客户端中,然后他们可以修改并发送它.

我们想要修改电子邮件并以HTML格式发送.

根据此链接,MSDN链接MAPI不适用于此http://support.microsoft.com/kb/268440

我在ExpertsExchange上看到一篇文章说你可以使用MAPI来做这件事,但是我无法让这个例子与Outlook一起工作(还没有试过任何其他客户端)

procedure ShowMailDlg(ToName,Address,HTMLMessage: string);

var

li: integer;

lMessage: TMapiMessage;

lRecipArray: array of TMapiRecipDesc;

lREs: DWord;

begin

SetLength(lRecipArray,1);

lRecipArray[0].ulRecipClass:=MAPI_TO;

lRecipArray[0].lpszName:=pChar(ToName);

lRecipArray[0].lpszAddress:=pChar(Address);

lMessage.ulReserved:=0;

lMessage.lpszSubject:=nil;

lMessage.lpszNoteText:=pChar(HTMLMessage);

lMessage.lpszMessageType:= nil;//pChar('HTML');

lMessage.lpszDateReceived:=nil;

lMessage.lpszConversationID:=nil;

lMessage.flFlags:=0;

lMessage.lpOriginator:=nil;

lMessage.nRecipCount:=length(lRecipArray);

lMessage.lpRecips:=PMapiRecipDesc(lRecipArray);

lMessage.nFileCount:=0;

lMessage.lpFiles:=PMapiFileDesc(nil);

lRes:=MapiSendMail(0, 0 , lMessage,MAPI_DIALOG, 0);

end;

任何人都有任何想法我怎么能这样做.我可以自动化Outlook但我想保持它与电子邮件客户端(因此MAPI)相当独立

谢谢

更新：感谢大家的建议.该功能的问题并非使用频繁,因此要求用户配置SMTP详细信息并不是一个真正的选择.我想我们会坚持使用纯文本电子邮件.

谢谢

delphi 发送html邮件,delphi – 以HTML格式发送电子邮件相关推荐

java发送outlook邮件_通过Java代码发送OutLook邮件
准备我们想通过Java代码实现发送OutLook邮件,必须准备以下材料: OutLook邮箱目标邮箱查看OutLook邮箱信息打开OutLook邮箱,在Settings中搜索或找到SMTP: ...
android 发送csv邮件,无法在android中使用电子邮件发送.csv文件
我打算在邮件中附加".csv"并发送它.但是面临的问题是csv文件在接收端不可用.无法在android中使用电子邮件发送.csv文件我试图太多MIME类型应用/八位字节流,文本 ...
一天可以发送多少邮件量，有没发送限制。
总的来说,根据邮件的发送需求的不同,邮件发送的频率限制要分成三种类型:第一种,验证码:第二种是通知类邮件:第三种是营销类邮件:这三种的限制和要求都不一样,不是在邮件营销,邮件发送这一块做了很多年的朋友 ...
delphi 发送html邮件,delphi发送html带附件邮件
var html: TIdText; begin if not SMTP.Connected then SMTP.Disconnect(); try SMTP.Connect; try if SMTP ...
.net 发送html邮件,c#利用system.net发送html格式邮件
using system; using system.text; using system.net; using system.net.mail; using system.net.mime; nam ...
python 发送outlook邮件（html）格式需要避的坑
最近有个统计数据后自动发送邮件的需求.公司用的邮箱是outlook2016,在外面写好结构样式后,满心欢喜发到邮箱后,发现根本不是那回事.虽然我不能告诉你哪些属性可以,但是我可以分享哪些属性不可以 1 ...
python发送图片邮件exchangelib_使用Python-Exchangelib库的电子邮件正文中的表格式
我正在python中探索如何使用exchangelib库编写电子邮件,其正文内容包含一个表内容.在我已经尝试了在正文内容中添加表的代码.在import pandas as pd import num ...
curl发送html邮件,使用curl命令行发送/发布xml文件
如果该问题与您的其他Hudson问题有关,请使用它们提供的命令.从命令行使用XML的这种方式: $ curl -X POST -d '...' \ http://user:pass@myhost:my ...
java发送文本邮件_1、java实现发送纯文本邮件
例子根据163邮箱进行测试,测试成功第一步:开启网易邮箱POP3服务和IMAP服务.登录网易邮箱-->设置-->POP3/SMTP/IMAP-->设置客户端授权码. 第二步:准备j ...
java 发送会议邮件模板_使用javamail发送会议邀请
网上找了很多关于javamail发送会议请求的文章,终于成功了,没有使用ical4j,发送的outlook直接打开就是一个会议请求,而不是以附件的形式存在.具体的注意点在代码中以注释的形式标明. DE ...

delphi 发送html邮件,delphi – 以HTML格式发送电子邮件

delphi 发送html邮件,delphi – 以HTML格式发送电子邮件相关推荐

最新文章

热门文章