TIdSMTP控件发邮件的问题!发言就送分!快来拿分吧! TIdSMTP控件发邮件的问题,怎么实现邮件群发功能,在邮件中怎么实现邮件的超链接!回答就给分!快来拿分!急,在线等待! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 demos--->Indy---->mailclient就是例子,用bcclist(抄送)ccist(密送) 哪个例子我改过了,我要的是用户收到我的邮件时能超链接!如:**你好: 欢迎访问www.csdn.com网站,用户只要一点www.csdn.com就能链接到www.csdn.com网站上来了!有没有什么方法了!谢谢了1 popeyepower(popeyepower) 能不能讲的详细点,什么叫HTML我发邮件的内客用HTML语言来写吗? with IdMsgSend do begin Body.Assign(Memo1.Lines);{Memo中写成html格式的超连接,例如:<a href='www.163.net'>163</a>} ContentType := 'text/html'; //设置为超文本格式 From.Text := UserEmail; ReplyTo.EMailAddresses := UserEmail; Recipients.EMailAddresses := edtTo.Text; { To: header } Subject := edtSubject.Text; { Subject: header } CCList.EMailAddresses := edtCC.Text; {CC} BccList.EMailAddresses := edtBCC.Text; {BBC} end; {now we send the message} SMTP.Connect; try SMTP.Send(IdMsgSend); finally SMTP.Disconnect; end; 高手们看看,如何取得进程内当前栈总使用大小,如何取得线程内栈使用大小 谁有日期大小写转换的函数 realaudio控件 在Delphi中怎样控制excel进行横向打印 有介绍常用控件用法的文章吗? 求一个sql server的函数! 帮帮忙,兄弟们,关于编历,送分 如何在delphi中实现托盘图标 sniffer 源代码 如何修改系统单元文件,如何编译,修改一些文件,好象不太行,看不到反映,为什么,如何解决 dbgrid的小问题 PopupMenu 问题
欢迎访问www.csdn.com网站,用户只要一点www.csdn.com就能链接到www.csdn.com网站上来了!有没有什么方法了!谢谢了1
begin
Body.Assign(Memo1.Lines);{Memo中写成html格式的超连接,例如:<a href='www.163.net'>163</a>}
ContentType := 'text/html'; //设置为超文本格式
From.Text := UserEmail;
ReplyTo.EMailAddresses := UserEmail;
Recipients.EMailAddresses := edtTo.Text; { To: header }
Subject := edtSubject.Text; { Subject: header }
CCList.EMailAddresses := edtCC.Text; {CC}
BccList.EMailAddresses := edtBCC.Text; {BBC}
end;
{now we send the message}
SMTP.Connect;
try
SMTP.Send(IdMsgSend);
finally
SMTP.Disconnect;
end;