Computer/ASP

CDO 객체를 이용한 메일발송 ASP 예제

알찬돌삐 2011. 11. 29. 09:39


CDO.Message 와 CDONTS.NewMail 의 차이점은
cdonts 는 NT 에 제공된 메일 컴포넌트 이며 2000서버부터 CDO가 제공되었습니다. 
물론 2000에서는 호환성 때문인지는 모르지만 cdonts도 같이 제공되었구요. 
XP Pro / 2003 서버에서는 더이상 cdonts는 제공되지 않습니다. 


SMTP 인증없이 메일 발송하는 방법입니다.

  1. strFrom = "xxxx@orgio.net" ' change to your email address
  2. strTo = "xxxx@hanmail.net" ' change to the recipient's address
  3. strSubject = "사과메일 입니다. " ' change to your subject
  4. strBody = "업무에 지장을 드려 죄송합니다. 에러를 수정하였습니다. "
  5. ' the following section creates the mail object and sends the mail
  6.  
  7. Set objSendMail = CreateObject("CDO.Message")
  8.  objSendMail.From = strFrom
  9.  objSendMail.To = strTo
  10.  objSendMail.Subject = strSubject
  11.  objSendMail.HTMLBody = strBody
  12.  objSendMail.Send
  13. Set objSendMail = Nothing 

.