<%
'[1] CDO객체의 인스턴스 생성
Set objNewMail = Server.CreateObject("CDONTS.NewMail")

'[2] From
objNewMail.From = "보내는사람이메일"
'[3] To
objNewMail.To = "받는사람이메일"
'[4] Subject 
objNewMail.Subject = "테스트 메일"
'[5] Body
objNewMail.Body = "메일전송 테스트입니다."

'[6] Send()
objNewMail.Send()

'[7] 해제
Set objNewMail = Nothing
%>
메일을 전송하였습니다.