ASP के द्वारा CDOSYS इमेल भेजना

CDOSYS एसपी (ASP) में शामिल एक बिन्दुओं का घटक है। यह घटक एसपी के माध्यम से ईमेल भेजने के लिए उपयोग किया जाता है。

CDOSYS के द्वारा ईमेल भेजना

CDO (Collaboration Data Objects) माइक्रोसॉफ्ट की एक प्रौद्योगिकी है जिसका उद्देश्य संचार कार्यक्रमों के निर्माण को सरल बनाना है。

CDOSYS एसपी (ASP) में शामिल एक बिन्दुओं का घटक है। हम आपको इस कंपोनेंट का उपयोग करके ईमेल भेजने के तरीके दिखाएंगे。

CDONTs कैसा है?

माइक्रोसॉफ्ट ने Windows 2000, Windows XP और Windows 2003 में CDONTs को खत्म कर दिया है। अगर आप अभी भी अपने अनुप्रयोग में CDONTs का उपयोग कर रहे हैं, तो आपको कोड को अद्यतन करना होगा और नई CDO (Collaboration Data Objects) प्रौद्योगिकी का उपयोग करना होगा。

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
%>

Bcc और 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.codew3c.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
दूरस्थ SMTP सेवादाता का IP या नाम
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="smtp.server.com"
उपयोगकर्ता
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25 
myMail.Configuration.Fields.Update
myMail.Send
set myMail=nothing
%>