with IdMessage1 do   begin     Clear;      Body.Assign(Memo1.Lines);     From.Text := '海外 '; Recipients.EMailAddresses := 'yi@udngroup.com'; Subject := '本週訂單'; ReceiptRecipient.Text := 'From.Text'; end; IdSMTP1.AuthenticationType := atLogin; {Simple Login} IdSMTP1.Username := 'yi'; IdSMTP1.Password := 'XXX'; IdSMTP1.Host := 'smtp.udngroup.com'; IdSMTP1.Port := 25; try IdSMTP1.Connect; try IdSMTP1.Send(IdMessage1); ShowMessage('E-Mail 已寄出'); finally IdSMTP1.Disconnect; end; except on e: exception do begin ShowMessage('Mail 寄送失敗:' e.Message); end; end; 這是發信程式，請問各位大大，是哪裡錯誤 感謝

Outlook Express本身是有防護的。 請先確認在outlook express的工具->選項->安全性下的 「在其他程式試圖以我的名義傳送電子郵件時警告我」沒有被勾選。 否則outlook express不會幫你寄信。 ----------------------------------------------

Stallion 大大 取消『在其他程式試圖以我的名義傳送電子郵件時警告我』勾選 還是不行 那還有什麼方問題嗎??

就源碼而言，和 Outlook Express 無關吧。請確定一下 SMTP server 可用嗎？會不會所有經 smtp port 的 email 都要給防毒程式掃一下？    http://pywong.hk.st http://www.lazybones.ca

基本上該程式在發信都沒問題 問題在於，收信者要回條時就會發生該錯誤訊息 收信者在一般的收發信均沒問題，回條一樣沒問題 只有該程式收到的信，要回條就是會發生錯誤