徐 徐丹 Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-20 #1 我想写一个程序可以将若干文件作为邮件附件发送到指定地址, 有没相控件及范利?300分请笑纳!
M mogao Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-20 #3 delphi自己、各种internet的控件包里都带有smtp的控件
徐 徐丹 Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #5 使用 ShellExecute(Handle, 'open', 'mailto:aaa@bbb' + '?cc=xxx@yyy' + '&bcc=zzz@ddd' + '&subject="Hello%20how%20are%20you"' + '&body="This%20is%0Aa%20two%20line%20message."', nil, nil, SW_NORMAL); 可以发送邮件,但如何发送附件呢?
使用 ShellExecute(Handle, 'open', 'mailto:aaa@bbb' + '?cc=xxx@yyy' + '&bcc=zzz@ddd' + '&subject="Hello%20how%20are%20you"' + '&body="This%20is%0Aa%20two%20line%20message."', nil, nil, SW_NORMAL); 可以发送邮件,但如何发送附件呢?
房 房客 Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #6 如果是程序的话 用控件更方便 SAKMAIL AHM2000 RC25都可以,而且有范例
Y yck Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #8 还是用SAKEMAIL构件吧,有例子,比较方便,也很好用! 至于哪里有,在大富翁里查找SAKEMAIL就可以知道了, 因为前面的答案里已经有了。
S sanrex Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #10 利用outlook发送邮件,with attachement 我就知道这个,看看是否可以选择. var OutLookObject : Variant; MailObject : Variant; begin OutLookObject := CreateOleObject('Outlook.Application'); MailObject := OutLookObject.CreateItem(0); MailObject.Recipients.Add(‘XXX◎XXX.com'); MailObject.Body := 'This is a test...'; MailObject.Subject := 'Hi there...'; MailObject.Attachments.add('c:/temp1/XXX.doc'); MailObject.Attachments.add('c:/temp1/XXX1.doc'); MailObject.Send; end;
利用outlook发送邮件,with attachement 我就知道这个,看看是否可以选择. var OutLookObject : Variant; MailObject : Variant; begin OutLookObject := CreateOleObject('Outlook.Application'); MailObject := OutLookObject.CreateItem(0); MailObject.Recipients.Add(‘XXX◎XXX.com'); MailObject.Body := 'This is a test...'; MailObject.Subject := 'Hi there...'; MailObject.Attachments.add('c:/temp1/XXX.doc'); MailObject.Attachments.add('c:/temp1/XXX1.doc'); MailObject.Send; end;
S syn123 Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-22 #12 ToAddress ,ToCC. ToBCC Attachments都是TStringList对象,xixi..知道了吧! NMSMTP1->Host= NMSMTP1->UserID= NMSMTP1->EncodeType==uuMime; NMSMTP1->PostMessage->FromAddress= NMSMTP1->PostMessage->ToAddress NMSMTP1->PostMessage->Subject= NMSMTP1->PostMessage->ToCarbonCopy NMSMTP1->PostMessage->ToBlindCarbonCopy 使用Connect()连接 使用SendMail() 发送
ToAddress ,ToCC. ToBCC Attachments都是TStringList对象,xixi..知道了吧! NMSMTP1->Host= NMSMTP1->UserID= NMSMTP1->EncodeType==uuMime; NMSMTP1->PostMessage->FromAddress= NMSMTP1->PostMessage->ToAddress NMSMTP1->PostMessage->Subject= NMSMTP1->PostMessage->ToCarbonCopy NMSMTP1->PostMessage->ToBlindCarbonCopy 使用Connect()连接 使用SendMail() 发送
悲 悲酥清风 Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-22 #13 用Outlook不好吧,有些人不用它的,比如我就是一个。 如果有时间的话,最好还是仿SakeMail做一个,会提高水平的。
徐 徐丹 Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-25 #14 感谢各位,我用SAKMAIL 做了一个,有一个新问题,用SAKMAIL发送的邮件用OE接收 并打开后,主题及正文的汉字是乱码,不知何故,另外,8Bit及basec64指的是什么, 是否与此有关系,我没研究源码(也研究不通),请各位大侠告诉我如何解决;
感谢各位,我用SAKMAIL 做了一个,有一个新问题,用SAKMAIL发送的邮件用OE接收 并打开后,主题及正文的汉字是乱码,不知何故,另外,8Bit及basec64指的是什么, 是否与此有关系,我没研究源码(也研究不通),请各位大侠告诉我如何解决;
M mogao Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-25 #15 我写了一片专门讲解各种乱码算法的《乱码算法大全》 可以到我的竹叶上去下载 http://mogao.126.com 在“大富翁练功厂”也可以下载