請問各位大大
我利用TNMSMTP寄送郵件時
出現一個error code
451 4.3.2 Please try again later

有人有遇過嗎
這是什麼樣的問題

還有就是他會自動跳出一個Showmessage的提示訊息
這個訊息會讓我的程式停住，要怎麼防止他跳出來訊息
或是可以直接把這個error code接起來寫到log裡面

感謝嚕!

===
with NMSMTP1 do begin
Host := lf_ChainCode('CM_EMAIL','Host');
Port := StrToInt(lf_ChainCode('CM_EMAIL','Port'));
UserID := lf_ChainCode('CM_EMAIL','UserID');
PostMessage.FromAddress := lf_ChainCode('CM_EMAIL','FromAddr');
PostMessage.FromName := lf_ChainCode('CM_EMAIL','FromName');
Connect;
ClearParameters;
PostMessage.ToAddress.Text := Trim(as_ToAddress);
PostMessage.Subject := '【自動發送】Mail;

PostMessage.Attachments.Text := as_FileName;
SendMail;
Disconnect;
end;

[code delphi]
try
with NMSMTP1 do begin
Host := lf_ChainCode('CM_EMAIL','Host');
Port := StrToInt(lf_ChainCode('CM_EMAIL','Port'));
UserID := lf_ChainCode('CM_EMAIL','UserID');
PostMessage.FromAddress := lf_ChainCode('CM_EMAIL','FromAddr');
PostMessage.FromName := lf_ChainCode('CM_EMAIL','FromName');
Connect;
ClearParameters;
PostMessage.ToAddress.Text := Trim(as_ToAddress);
PostMessage.Subject := '【自動發送】Mail;
PostMessage.Attachments.Text := as_FileName;
SendMail;
Disconnect;
end;
except on E : Exception do
MessageDlg('發送mail錯誤-E-請重新操作-' E.Message, mtInformation, [mbOK], 0);
end;


[/code]

------
程式沒有這麼難
只是還沒打通其中要絕

http://www.faqs.org/rfcs/rfc2645.html

參閱 RFC 對 451 的定義吧.

這個你要是不懂,說再多也是多說的.^^