ارسال ايميل با کمک ASP

استفاده از آبجکت CDONTS که يکي از کامپوننتهاي ويندوز سرور 2000 و ان تي مي باشد به راحتي مي توان در اسکريپتهاي سمت سرور ايميل ارسال کرد.

طريقه استفاده به شکل زير مي باشد :

<%
Dim objNewMail
Set objNewMail = Server.CreateObject("CDONTS.NewMail")
%>

مقادير قابل تنظيم براي اين آبجکت به شرح جدول زير مي باشد :

متدهاي اين آبجکت

بعد از ارسال ايميل مقادير در حافظه باقي مي ماند و شما بايد حافظه را خالي کنيد. همچنين براي ارسال يک ايميل جديد بايد يک آبجکت جديد ايجاد کرده و از آن استفاده کنيد. کد زير نحوه استفاده از اين آبجکت را در asp نشان مي دهد.

<%
Option Explicit

Dim objNewMail

 ' ابتدا يک آبجکت از نوع cdonts ايجاد مي کنيم
Set objNewMail = Server.CreateObject("CDONTS.NewMail")

 ' بعد از ايجاد آبجکت ما بايد مقادير مربوط به آن را تنظيم کنيم

objNewMail.From = "webmaster@iran.com"
objNewMail.To = "test@yahoo.com"

"اين يک ايميل تستي است"objNewMail.Subject =
"اين متن نامه استobjNewMail.Body = "
objNewMail.Send

 ' بعد از ارسال ايميل با استفاده از کد زير فضاي حافظه را خالي مي کنيم

Set objNewMail = Nothing

"ايميل ارسال شد"Response.Write

%>