F
flybubble
Unregistered / Unconfirmed
GUEST, unregistred user!
代码是这样的:
if not idsmtp1.Connected then idsmtp1.Connect;
try
idSMTP1.Send(IdMessage1);
messagebox(handle,'发送成功','信息发送成功!',0);
memo1.Lines.Add('发送成功');
idSMTP1.Disconnect;
except
messagebox(handle,'发送失败','信息发送失败!',0);
memo1.Lines.Add('发送失败');
idSMTP1.Disconnect;
end;
发第一封邮件是可以的,但是连续再发第二封时候就出错啦,请高手解答一下,分不多,谢先!
if not idsmtp1.Connected then idsmtp1.Connect;
try
idSMTP1.Send(IdMessage1);
messagebox(handle,'发送成功','信息发送成功!',0);
memo1.Lines.Add('发送成功');
idSMTP1.Disconnect;
except
messagebox(handle,'发送失败','信息发送失败!',0);
memo1.Lines.Add('发送失败');
idSMTP1.Disconnect;
end;
发第一封邮件是可以的,但是连续再发第二封时候就出错啦,请高手解答一下,分不多,谢先!