Q&A

  • delphi 5.0 에서 NmSMTP 로 메일보내기
// 소스내용

  try
    with NmSMTP1 do begin
      ClearParameters;
      Host   := 'smtp.mail.yahoo.co.kr';  // 메일써버
      Port   := 25;                 //고정값
      UserID := user_id;            //자기 사용자 아이디
      Connect;
    end;
    // 보내는 사람 정보
    with NmSMTP1.PostMessage do begin
    // 밑에 같이 처리하면 나중에
      FromAddress := from_mail;                    // 보내는 사람
      FromName    := from_name;
    end;
    // 받는 사람 정보
    with NmSMTP1.PostMessage do begin
      if mail1_ok then ToAddress.Add(Trim(to_mail1))          // 받는사람 email주소
      else ToAddress.Add(Trim(to_mail2));
      ListBox1.Items.Add(add_file);
      Attachments.AddStrings(ListBox1.items);      // 첨부file
      Subject:=jemok;                              // 제목
      Body.AddStrings(Memo1.Lines);
    end;
    NmSMTP1.SendMail;
  Except
    on ESockError do
    begin
      MessageDlg('E-Mail 전송을 실패 했습니다!',mtWarning,[mbOK],0);
      NmSMTP1.Disconnect;
    end;
  end;



//
에러내용은 530 authentication required      인증요구하더라구요

여기저기 자료를 찾아봐고 Indy 로 하라구 하구요
제가 쓰는 delphi 5.0 을 사용하는데 버젼을 바꿀필요까지는 없거든요

delphi 5.0에서 nmSMTP 로 메일을 전송할려면 어떻게 해야하죠

outlock 에서는 서버설정해주고 user_id,password  입력해주고
인증필요 를 check 해주니까 전송이 잘돼던데요..




0  COMMENTS