Nmail ASP 서비스 종료 안내(EOS)
451 에러가 왜 나는거예요?
<%
content1=request("content1")
content2=request("content2")
content3=request("content3")
content4=request("content4")
content5=request("content5")
content6=request("content6")
content1=replace(content1,chr(10)&chr(13),"<br>")
content2=replace(content2,chr(10)&chr(13),"<br>")
content3=replace(content3,chr(10)&chr(13),"<br>")
content4=replace(content4,chr(10)&chr(13),"<br>")
content5=replace(content5,chr(10)&chr(13),"<br>")
content6=replace(content6,chr(10)&chr(13),"<br>")
subject = "온라인 조사의뢰 메일입니다."
Set mailing = Server.CreateObject("Ncdo.Ncdonts.1")
mailing.Smtpserver = "mail.leespr.co.kr"
email="조사의뢰입니다."
HTML = "<HTML><HEAD><TITLE>"
HTML = HTML & "</TITLE>"
HTML = HTML & "</HEAD>"
HTML = HTML & "<BODY><table border=0 cellpadding=0 cellspacing=0>"
HTML = HTML &"<tr><td >1." & content1 &"</td></tr>"
HTML = HTML &"<tr><td > </td></tr>"
HTML = HTML &"<tr><td >2." & content2 &"</td></tr>"
HTML = HTML &"<tr><td > </td></tr>"
HTML = HTML &"<tr><td >3." & content3 &"</td></tr>"
HTML = HTML &"<tr><td > </td></tr>"
HTML = HTML &"<tr><td >4." & content4 &"</td></tr>"
HTML = HTML &"<tr><td > </td></tr>"
HTML = HTML &"<tr><td >5." & content5 &"</td></tr>"
HTML = HTML &"<tr><td > </td></tr>"
HTML = HTML &"<tr><td >6." & content5 &"</td></tr>"
HTML = HTML &"</BODY>"
HTML = HTML & "</HTML>"
mailing.From=email '<-- 자신의 E-mail 주소를 쓰시구요
mailing.To="****@****"
mailing.Subject= subject '<-- 이건 제목입니다.
mailing.MailFormat = 0
mailing.Body= HTML
mailing.importance=0
mailing.bodyformat=0
if mailing.Send = 1 then
Response.Write "메일발송성공"
else
Response.Write mailing.Errormsg
end if
Set mailing = Nothing
%>
| 이전 글 | 폼메일관련 입니다 5 | 이*자 | 2003.03.21 |
|---|---|---|---|
| 다음 글 | 답변부탁드리겠습니다 ㅠㅠ 1 | 김*구 | 2003.03.20 |