ASP brug af CDOSYS til at sende e-mail
- Forrige side ASP Global.asa
- Næste side ASP Response
CDOSYS er en indbygget komponent i ASP. Denne komponent bruges til at sende e-mails via ASP.
Send e-mail med CDOSYS
CDO (Collaboration Data Objects) er en teknologi fra Microsoft, der er designet til at forenkle oprettelsen af kommunikationsprogrammer.
CDOSYS er en indbygget komponent i ASP. Vi vil vise dig, hvordan du bruger denne komponent til at sende e-mails.
Hvordan er CDONTs?
Microsoft har afskaffet CDONTs i Windows 2000, Windows XP og Windows 2003. Hvis du stadig bruger CDONTs i dine applikationer, skal du opdatere koden og bruge den nye CDO-teknologi.
Brug en instans af CDOSYS
Send en email:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="某人@somedomain.com"
myMail.TextBody="Dette er en besked."
myMail.Send
set myMail=nothing
%>
Send en tekstmail med Bcc og Cc-felter:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="某人@somedomain.com"
myMail.Bcc="某人else@somedomain.com"
myMail.Cc="某人else2@somedomain.com"
myMail.TextBody="Dette er en besked."
myMail.Send
set myMail=nothing
%>
Send en HTML-mail:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="某人@somedomain.com"
myMail.HTMLBody = "<h1>Dette er en besked.</h1>"
myMail.Send
set myMail=nothing
%>
Send en HTML-mail, der sender en webside fra en hjemmeside:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="某人@somedomain.com"
myMail.CreateMHTMLBody "http://www.codew3c.com/asp/"
myMail.Send
set myMail=nothing
%>
Send en HTML-mail, der sender en webside fra computeren:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="某人@somedomain.com"
myMail.CreateMHTMLBody "file://c:/mydocuments/test.htm"
myMail.Send
set myMail=nothing
%>
Send en email med vedhæftet fil:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="某人@somedomain.com"
myMail.TextBody="Dette er en besked."
myMail.AddAttachment "c:\mydocuments\test.txt"
myMail.Send
set myMail=nothing
%>
Send en tekstmail ved hjælp af en fjern server:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="某人@somedomain.com"
myMail.TextBody="Dette er en besked."
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Fjern server SMTPs IP-adresse eller navn'
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="smtp.server.com"
'Serverport'
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
myMail.Configuration.Fields.Update
myMail.Send
set myMail=nothing
%>
- Forrige side ASP Global.asa
- Næste side ASP Response
