M
myweb_pch
Unregistered / Unconfirmed
GUEST, unregistred user!
关于电子邮件保存附件的问题？
在保存附件时：我用了如下代码：
if savedialog1.execute then
begin
if savedialog1.filename<>'' then
TIdAttachment(msg.MessageParts.Items[index]).SaveToFile(savedialog1.filename);
end;
程序可以正常执行。
但是我想为了方便不在每次接收：附件都选择保存路径及文件名，想通过一个动态变化的字符串来代替
所有附件保存路径及文件名将程序改为如下；
TIdAttachment(msg.MessageParts.Item[index].SavetoFile(ls_directory);
在执行时总是出现：error saving Attchment.附件保存错误的提示。请问我该如何解决？
或者是如何才能一次性的把所有附件都保存到指定的目录下；
在保存附件时：我用了如下代码：
if savedialog1.execute then
begin
if savedialog1.filename<>'' then
TIdAttachment(msg.MessageParts.Items[index]).SaveToFile(savedialog1.filename);
end;
程序可以正常执行。
但是我想为了方便不在每次接收：附件都选择保存路径及文件名，想通过一个动态变化的字符串来代替
所有附件保存路径及文件名将程序改为如下；
TIdAttachment(msg.MessageParts.Item[index].SavetoFile(ls_directory);
在执行时总是出现：error saving Attchment.附件保存错误的提示。请问我该如何解决？
或者是如何才能一次性的把所有附件都保存到指定的目录下；
