تبليغاتX
پروژه های ASP.NET(بر پایه سی شارپ) - ارسال ایمیل در Asp.NET 1 و Asp.NET 2
ارسال ایمیل در Asp.NET 1 و Asp.NET 2 پنجشنبه بیست و سوم آبان 1387 10:48

ارسال ایمیل یکی از پر کاربرد ترین اعمال سمت سرور می باشد . در عین حال این کار بسیار ساده بوده و در تمامی سایت ها مورد نیاز است .

بنابراین بنده نحوه ارسال ایمیل در Asp.NET 1 و Asp.NET 2 را جداگانه توضیح خواهم داد:

برای ارسال ایمیل در دات نت 1  ابتدا فضا نام System.Web.Mail را وارد صفحه کرده » imports system.Web.mail

و سپس از کد زیر استفاده کنید :

        Dim objmail As New MailMessage

        objmail.From = mfrom

        objmail.To = mto

        objmail.Subject = subject

        objmail.BodyEncoding = System.Text.Encoding.UTF8

        objmail.Body = htmltext

        objmail.BodyFormat = MailFormat.Text

        SmtpMail.SmtpServer = mailserver

 

        objmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserver", mailserver)

        objmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserverport", 25)       

        objmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", 1)

        objmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", mfrom)

        objmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", pass)

 

        Try

            SmtpMail.Send(objmail)

        Catch ex As Exception

 

        End Try

حال کافیست به جای مقادیر mfrom آدرس ایمیل ارسال کننده ، به جای mto آدرس ایمیل گیرنده ، به جای subject موضوع ایمیل، به جای Htmltext متن نامه ، به جای mailserver آدرس smtp server که معمولا mail.yoursite.com هست (در صورتی که از میل سرور اطلاعی ندارید از مدیر هاست سوال کنید) و به جای pass پسوورد ایمیل خود را وارد کنید .
 
ارسال ایمیل در دات نت 2 کمی تفاوت کرده است  :
برای اینکار ابتدا فضا نام System.Net.Mail را وارد صفحه کرده » imports system.net.mail

سپس از کد های زیر استفاده کنید :
 

        Dim obj As New SmtpClient

        Dim Mailmsg As New MailMessage

        Mailmsg.To.Clear()

 

        Mailmsg.To.Add(New MailAddress(mto))

        Mailmsg.From = New MailAddress(mfrom)

        Mailmsg.Subject = subject

        Mailmsg.BodyEncoding = System.Text.Encoding.UTF8

        Mailmsg.IsBodyHtml = True

        obj.Host = mailserver

        Dim basicAuthenticationInfo As New System.Net.NetworkCredential(mfrom, pass)

 

        obj.UseDefaultCredentials = False

 

        obj.Credentials = basicAuthenticationInfo

 

        Mailmsg.Body = htmltext

        Mailmsg.IsBodyHtml = True

        Try

            obj.Send(Mailmsg)

        Catch ex As Exception

 

        End Try

 
حالا کافیست به جای مقادیر mfrom آدرس ایمیل  ارسال کننده ، به جای mto آدرس ایمیل گیرنده ، به جای subject موضوع ایمیل، به جای Htmltext متن نامه، به جای mailserver آدرس smtp server که معمولا mail.yoursite.com هست و به جای pass پسوورد ایمیل ارسال کننده را وارد کنید .
نوشته شده توسط برنامه نویس ASP.NET  | لینک ثابت |