全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:4622
推到 Plurk!
推到 Facebook!

TidMessage+TidSMTP來傳送郵件

 
ddaken
一般會員


發表:39
回覆:33
積分:19
註冊:2005-01-21

發送簡訊給我
#1 引用回覆 回覆 發表時間:2006-09-15 14:49:59 IP:218.167.xxx.xxx 訂閱

請問各位大大~
因為有些mail server有AUTH的功能
小弟使用NMSMTP皆無法傳送,但如果碰到mail server不需要驗證
PASSWORD皆可正常使用
因為為了解決這個問題
小弟現在想要用bcb的TidMessage TidSMTP來傳送郵件~~
不過~~參考了線上大大門的一些提供後
自己一直試還是都不行
請各位大大能幫我看看嘛?謝謝

我已經參考了
BCB6中Indy9發送郵件 http://delphi.ktop.com.tw/board.php?cid=168&fid=920&tid=26417
[VCL Howto 投稿] Indy 9.0.10 TIdSMTP & TIdMessage
http://delphi.ktop.com.tw/board.php?cid=30&fid=71&tid=20961
如何寄e-mail可以不會讓程式被咬住
http://delphi.ktop.com.tw/board.php?cid=168&fid=913&tid=58601

ps...請問
Indy E_mail小精靈程式部分
http://delphi.ktop.com.tw/board.php?cid=169&fid=943&tid=21398
此程式有人下載過嘛?可以寄給我嘛?謝謝~因為目前似乎不能下載了

我使用到1個button1,5個Edit,1個TidMessage,1個TidSMTP

void __fastcall TEdit1::Button1Click(TObject *Sender)
{
IdSMTP1->Host=Edit1->Text;
IdSMTP1->Port=25;
//IdSMTP1->AuthenticationType=atLogin;
IdSMTP1->AuthenticationType=atNone;

IdSMTP1->Username=Edit2->Text;
IdSMTP1->Password=Edit3->Text;

IdMessage1->Clear();
IdMessage1->From->Address=Edit4->Text;
IdMessage1->From->Name="test";

//正本收信者
IdMessage1->Recipients->Clear();
TIdEMailAddressItem *NewItem=IdMessage1->Recipients->Add();
NewItem->Address=Edit5->Text;

IdMessage1->Subject="寄信測試"; //設定寄信主旨
IdMessage1->Body->Add("Line1");


IdMessage1->UseNowForDate=true;
IdMessage1->CharSet="big5";

//要傳送的檔案名稱(附件)
IdMessage1->MessageParts->Clear();
IdMessage1->MessageParts->Add();
//new TIdAttachment(IdMessage1->MessageParts,附加檔案路徑名稱);

IdSMTP1->Connect(1);
IdSMTP1->Send(IdMessage1);
IdSMTP1->Disconnect();
}

附加檔案:error.bmp
ddaken
一般會員


發表:39
回覆:33
積分:19
註冊:2005-01-21

發送簡訊給我
#2 引用回覆 回覆 發表時間:2006-09-27 23:06:31 IP:125.232.xxx.xxx 訂閱

來自問自答好了...

小弟後來發現...相同的語法在indy9.0不能使用

而在indy8.0可以使用@@u

雖然不知道是為什麼....

不過...可以確定的是///應該是indy本身的bug吧@

系統時間:2024-11-23 3:43:24
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!