CDOSYS는 ASP의 기본 구성 요소입니다. 이 구성 요소는 ASP로 전자 메일을 전송하는 데 사용됩니다.
CDOSYS에 전자 메일 보내기
CDO (Collaboration Data Objects) 메시징 응용 프로그램의 생성을 단순화하도록 설계된 마이크로 소프트 기술입니다.
CDOSYS는 ASP의 기본 구성 요소입니다. 우리는 어떻게 ASP로 전자 메일을 보내려면이 구성 요소를 사용하는 방법을 보여줍니다.
어떻게 CDONTS에 대해?
Microsoft는 Windows 2000에서 CDONTS의 사용이 중단되었습니다, Windows XP 및 Windows 2003 당신이 당신의 ASP 응용 프로그램에서 CDONTS를 사용하는 경우, 당신은 코드를 업데이트하고 새로운 CDO 기술을 사용한다.
CDOSYS를 사용하여 실시 예
텍스트 전자 메일 보내기 :
<%
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "[email protected]"
myMail.To = "[email protected]"
myMail.TextBody = "This is a message."
myMail.Send
set myMail = nothing
%>숨은 및 CC 필드가있는 텍스트 전자 메일 보내기 :
<%
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "[email protected]"
myMail.To = "[email protected]"
myMail.Bcc = "[email protected]"
myMail.Cc = "[email protected]"
myMail.TextBody = "This is a message."
myMail.Send
set myMail = nothing
%>HTML 전자 메일 보내기 :
<%
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "[email protected]"
myMail.To = "[email protected]"
myMail.HTMLBody = "<h1>This is a message.</h1>"
myMail.Send
set myMail = nothing
%>웹 사이트에서 웹 페이지를 보내는 HTML 전자 메일을 보내기 :
<%
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "[email protected]"
myMail.To ="[email protected]"
myMail.CreateMHTMLBody = "http://www.w3ii.com/asp/"
myMail.Send
set myMail = nothing
%>컴퓨터의 파일에서 웹 페이지를 보내는 HTML 전자 메일을 보내기 :
<%
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "[email protected]"
myMail.To = "[email protected]"
myMail.CreateMHTMLBody = "file://c:/mydocuments/test.htm"
myMail.Send
set myMail = nothing
%>첨부 파일이있는 텍스트 전자 메일 보내기 :
<%
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "[email protected]"
myMail.To = "[email protected]"
myMail.TextBody = "This is a message."
myMail.AddAttachment = "c:\mydocuments\test.txt"
myMail.Send
set myMail = nothing
%>원격 서버를 사용하여 텍스트 이메일 보내기 :
<%
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "[email protected]"
myMail.To = "[email protected]"
myMail.TextBody = "This is a message."
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'Name or IP of remote SMTP server
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.server.com"
'Server port
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
myMail.Configuration.Fields.Update
myMail.Send
set myMail = nothing
%>