NEW Nmail PHP 3 업그레이드 할인
자세히 보기

CDO 컴포넌트 이용하여 발송 문제

신*규 2009.06.17 09:31 조회 13299

※ 필수입력정보 ※


▷ 제품버젼 : Nmail ASP 3.8

▷ 오류발생 메뉴/주소 :

▷ 에러메세지 : 오류 '8004020f'

CDO 컴포넌트을 이용해서 메일을 보내는데요

set objMessage = createobject("cdo.message")
set objConfig = createobject("cdo.configuration")

' 메일서버를 지정 합니다.
' sendusing 값이 1이면 MS SMTP를 이용하고 2이면 소켓전송방식으로 다른 메일서버를 사용 할 수 있습니다.
' smtpserver 항목은 IP혹은 도메인으로 입력하면 됩니다. (예: 211.170.106.1 or mail.passkorea.net )
Set Flds = objConfig.Fields
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "127.0.0.1"
Flds.update

Set objMessage.Configuration = objConfig

=======================================================
objMessage.To = "****@****" '받는 사람 이메일 주소

받는 사람 이메일 주소에 따라 오류 메시지가 출력 됩니다. 오류 '8004020f'

네이버, 네이트는 오류 메시지 없이 발송이 잘 되어지는데요

원인이 무엇인지요...

=======================================================


objMessage.From = name &" <"&email&">" '보내는 사람 이메일 주소
objMessage.Subject = "[기술지원]" & subject '제목
objMessage.HTMLBody = content

If Len(checkEmpty) > 0 Then
objMessage.AddAttachment full_attach_name
End If

' 메일 내용이 HTML 형식이면 objMessage.TextBody 대신에 objMessage.HTMLBody를 사용

objMessage.fields.update
objMessage.Send

set objMessage = nothing
set objConfig = nothing

Response.Write("<script language=javascript>")
Response.Write("    alert('sucess!');")
Response.Write("location.href = 'sendmailForm.asp'")
Response.Write("</script>")
Response.End

댓글 0
이전 글 리턴메일 분석좀 부탁합니다 1 지* 2009.06.17
다음 글 배경 디자인 변경 문의. 1 신*훈 2009.06.16