귀하는 손님 이십니다
로그인
회원가입
  
  델마당 공식 은행계좌
  하나은행 227-910235-83607
  예금주 이상국(운영진)
프로젝트 게시판
투표게시판
델마당소개
기초부터 활용까지! 델파이 교육 - 데브기어
 광고문의 :
吏덈Ц怨 떟蹂 吏덈Ц怨 떟蹂 입니다.
글내용 - 吏덈Ц怨 떟蹂
 [吏덈Ц] smtp 愿젴 吏덈Ц엯땲떎.
썑떖떖
(源쁺濡)
2019-05-15 삤쟾 10:32:35
287회 조회


등록된 파일이 없습니다.

1. 媛쒕컻/떎뻾 뵆옯뤌

(1) OS : windows 7

(2) 媛쒕컻댋 : delphi 7 / indy 9

(3) 궗슜 Database : 뾾쓬.

2. 媛쒕컻 以묒씤 봽濡쒓렇옩

- 꽕씠踰꾩 吏硫붿씪濡 smtp瑜 궗슜븯뿬 씠硫붿씪 諛쒖넚 뀒뒪듃

3. 吏덈Ц 궡슜

 

꽕씠踰꾩 吏硫붿씪쓣 넻븯뿬, 뜽뙆씠7뿉꽌 硫붿씪쓣 諛쒖넚븯뒗 諛⑸쾿쓣 뀒뒪듃빐蹂닿퀬엳뒿땲떎.

紐⑹쟻,  'Test' 젣紐⑹쑝濡 硫붿씪쓣 蹂대궡꽌 젙긽쟻쑝濡 諛쏆븘吏뒗吏瑜 솗씤븯怨좎떢뒿땲떎.

利, 떒닚엳 옒蹂대궡議뚮뒓깘媛 沅곴툑븳 긽솴씤뜲, 븯떎蹂대땲 留됲엳뒗 遺遺꾩씠엳뼱꽌 씠젃寃 湲쓣 삱由ш쾶릺뿀뒿땲떎.

씠踰ㅽ듃肄붾뱶뒗 踰꾪듉겢由 씠踰ㅽ듃 븯굹肉먯씠硫, 씠怨녹뿉꽌 濡쒖쭅씠 紐⑤몢 씠猷⑥뼱吏뒗뜲, 븘옒 濡쒖쭅 李멸퀬 遺긽뱶由쎈땲떎.

 

---------------------------------------------------------------------------------------------------

procedure TForm1.Button1Click(Sender: TObject);
begin
  IdSMTP.Host               := 'smtp.gmail.com';     //샇뒪듃
  IdSMTP.AuthenticationType := atLogin;            //濡쒓렇씤諛⑹떇
  IdSMTP.Username           := '****@gmail.com'; //蹂대궡뒗옄 硫붿씪
  IdSMTP.Password           := ''****;                  //蹂대궡뒗옄 鍮꾨踰덊샇
  IdSMTP.Port               := 587;                      // 룷듃

  idMessage.ContentType     := 'multipart/mixed; charset=UTF-8';
  idMessage.Encoding        := meMIME;
  IdMessage.From.Address    := '****@naver.com';  //諛쏅뒗옄 씠硫붿씪
  IdMessage.From.Name       := 'SMTP_Test';
  IdMessage.Subject         := 'Test';                     //젣紐

  IdSMTP.Connect;
  try
    IdSMTP.Send(IdMessage);
    IdSMTP.Disconnect;
    ShowMessage('씠硫붿씪蹂대궡湲곗꽦怨!!');
  except
    ShowMessage('씠硫붿씪蹂대궡湲곗뿉윭!!');
  end;
end;

---------------------------------------------------------------------------------------------------

吏硫붿씪 媛숈寃쎌슦뒗   IdSMTP.Connect; 源뚯 젙긽떎뻾맂 썑 

try臾몄뿉꽌

IdSMTP.Send(IdMessage); 씠遺遺꾩뿉꽌 뿉윭媛 궔땲떎.

뿉윭臾멸뎄뒗 Could not load ssl library 엯땲떎.

씪씠釉뚮윭由ъ갼븘꽌 빐떦뤃뜑뿉 꽔뼱룄 媛숈뿉윭媛 諛쒖깮빀땲떎.

 

삉븳 꽕씠踰꾧컳 寃쎌슦뒗,

븘옒肄붾뱶 李멸퀬 遺긽뱶由쎈땲떎.

---------------------------------------------------------------------------------------------------

procedure TForm1.Button1Click(Sender: TObject);
begin
  IdSMTP.Host               := 'smtp.naver.com';     //샇뒪듃
  IdSMTP.AuthenticationType := atLogin;            //濡쒓렇씤諛⑹떇
  IdSMTP.Username           := '****@naver.com'; //蹂대궡뒗옄 硫붿씪
  IdSMTP.Password           := ''****;                  //蹂대궡뒗옄 鍮꾨踰덊샇
  IdSMTP.Port               := 465;                      // 룷듃

  idMessage.ContentType     := 'multipart/mixed; charset=UTF-8';
  idMessage.Encoding        := meMIME;
  IdMessage.From.Address    := '****@gmail.com';  //諛쏅뒗옄 씠硫붿씪
  IdMessage.From.Name       := 'SMTP_Test';
  IdMessage.Subject         := 'Test';                     //젣紐

  IdSMTP.Connect;
  try
    IdSMTP.Send(IdMessage);
    IdSMTP.Disconnect;
    ShowMessage('씠硫붿씪蹂대궡湲곗꽦怨!!');
  except
    ShowMessage('씠硫붿씪蹂대궡湲곗뿉윭!!');
  end;
end;

---------------------------------------------------------------------------------------------------

쐞쓽 肄붾뱶뒗 꽕씠踰꾨줈 뻽쓣寃쎌슦씤뜲,

씠寃쎌슦뒗   IdSMTP.Connect; 遺遺꾩뿉꽌 뿉윭瑜 諛쒖깮빀땲떎.

뿉윭臾멸뎄뒗 Connect Closed Gracefully 엯땲떎. 留됲삍떎씪뒗 씠빞湲곗씤뜲...

꽕씠踰꾩뿉꽌 젣怨듯빐二쇰뒗 꽕젙踰뺣濡 룷듃굹 湲고 궡슜뱾쓣 룞씪븯寃 꽭똿븯뒗뜲룄 留덉갔媛吏媛숈븘슂.

 

吏떇씠吏㏃븘꽌, 솢븞릺뒗吏瑜 옒 紐⑤Ⅴ寃좎뒿땲떎.

꽑諛곕떂뱾 議곗뼵 遺긽뱶由쎈땲떎.