آیا در ارسال email مشکل دارید؟

**titbasoft** · جمعه 08 مهر 1384, 18:38 عصر

بسیاری از سرورهای کنونی برای ارسال email نیاز به SMTP Authentication دارند. این همون علتی است که بسیاری از کسانی که سعی در فرستادن ایمیل از طریق asp.net میکنند اگر مقصد روی سرور دیگری باشد آن email با مشکل مواجه می شه. حالا این سوال پیش میاد که چطوری میشه این مشکل رو حل کرد. جواب خیلی ساده است. تنها با اضافه کردن کد زیر این مشکل حل خواهد شد:

 MailMessage msg = new MailMessage();

	msg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserver", smtpServer);

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

	msg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusing", cdoSendUsingPort) ;

	msg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", cdoBasic); 

	msg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", userName); 

	msg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", password);

username و password همان account ایمیل شما در نظر گرفته خواهد شد . بقیه تنظیمات هم که مشخصه. فقط گاهی اوقات (خیلی به ندرت) ممکنه port مربوطه هم فرق داشته باشه که اون رو هم باید از mail server تون درخواست کنید.

**Behrouz_Rad** · جمعه 08 مهر 1384, 21:51 عصر

پ.ن: فایل Interop.CDO.dll را نیز به عنوان Reference برنامه در پوشه ی Bin کپی کنید. Search About It

**JikSearch** · شنبه 30 مهر 1384, 13:32 عصر

فایل Interop.CDO.dll از کجا تهیه کنیم؟ من توی کامپیوترم Search کردم نبود.
تشکر

**M.GhanaatPisheh** · شنبه 30 مهر 1384, 14:10 عصر

http://forums.aspfree.com/archive/t-...-app-and-email

**EhsanKhafan** · یک شنبه 08 آبان 1384, 14:09 عصر

با تشکر از titbasoft
یک سوال cdoSendUsingPort و cdoBasic چیه؟
ممنون

**manager** · دوشنبه 16 آبان 1384, 13:35 عصر

با سلام

آقا ما مردیم نتونستیم یه میل ارسال کنیم من نمی دونم چرا برنامه نویسان PHP مشکل smtpServer ندارن اما ASP یا ASP.net همیشه این مشکل رو داشته ؟

لطفا مشکل منو حل کنید. (شاید هم من اشتباه می کنم !)

**mehrdotnet** · دوشنبه 16 آبان 1384, 20:03 عصر

اگه اساتید محترم لطف کنن و یه مثال بذارن خیلی عالیه !!! لطفاً اگه ممکنه...

**Behrouz_Rad** · سه شنبه 17 آبان 1384, 06:19 صبح

ابتدا باید فایل های cdosys.dll و adodb.dll را در پوشه ی bin کپی کنید.
این فایل ها رو می تونید از سایت www.dlldump.com داونلود کنید.
پس از اضافه کردن این فایل ها به صورت Reference به برنامه، نیاز به کمی کدنویسی دارید:



Dim cdoSendUsingMethod As String = "http://schemas.microsoft.com/cdo/configuration/sendusing"

        Dim cdoSMTPServerPickUpDirecory As String = "http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory"

        Dim cdoSMTPServer As String = "http://schemas.microsoft.com/cdo/configuration/smtpserver"

        Dim cdoSMTPServerPort As String = "http://schemas.microsoft.com/cdo/configuration/smtpserverport"

        Dim cdoSMTPConnectionTimeout As String = "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"

        Dim cdoSMTPAuthenticate As String = "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"

        Dim cdoSendUserName As String = "http://schemas.microsoft.com/cdo/configuration/sendusername"

        Dim cdoSendPassword = "http://schemas.microsoft.com/cdo/configuration/sendpassword"



        Dim objMM As CDO.Message = New CDO.Message

        Dim Flds As ADODB.Fields = objMM.Configuration.Fields



        Flds(cdoSendUsingMethod).Value = CDO.CdoSendUsing.cdoSendUsingPort

        Flds(cdoSMTPAuthenticate).Value = CDO.CdoProtocolsAuthentication.cdoBasic

        Flds(cdoSMTPServer).Value = "localhost"



        Flds.Update()

        objMM.MimeFormatted = True



        objMM.From = "info@yektadev.com"

        objMM.To = "behrouz.rad@gmail.com"



        objMM.Subject = "Welcome!"

        objMM.HTMLBody = "<HTML><HEAD></HEAD><BODY><b>Welcome To My WebSite!</b></BODY></HTML>"



        objMM.Send()

البته در کد فوق، از تمامی ثبات های تعریف شده استفاده نشده چون نیازی نبوده.
در صورتی که سرویس ارسال ایمیل هاست شما جهت ارسال ایمیل به username و password نیاز داشت، ثبات های cdoSendUserName و cdoSendPassword نیز باید مقداردهی شوند.
توجه: فایل Interop.CDO.dll، احتمالا به صورت خودکار در پوشه ی bin ایجاد خواهد شد.
موفق باشید.

**EhsanKhafan** · پنج شنبه 03 آذر 1384, 06:24 صبح

سلام
منم بعد از کلی تلاش تونستم ایمیل رو ارسال کنم(آخه معمولا ناقص بیان میشه) با تشکر از آقا بهروز که خیلی کمک کردن تو وبلاگم سورس نهایی برای ارسال ایمیل (+لاگین کردن به میل سرور) رو گذاشتم 100% کار میکنه:

http://notvoid.persianblog.com/

**mostafa612003** · سه شنبه 08 آذر 1384, 10:17 صبح

سلام
می شود به صورت asp هم این کد را بنویسید

**rohollahmahmoodiany** · جمعه 11 آذر 1384, 01:13 صبح

من از smtpserver برای ارسال ایمیل استفاده میکنم .ایا نیازی به اضافه کردن کدهایی که titbasoft گفت دارم.اگر نه کد زیر چه مشکلی دارد.
MailMessage smtpMssg =new MailMessage ();

smtpMssg.To = "rohollahmahmoodiany@yahoo.com";
smtpMssg.From = "a@yahoo.com" ;
smtpMssg.Subject = "Message from friend" ;
smtpMssg .BodyFormat=MailFormat.Text;
smtpMssg.Body = "Hello Dude";
smtpMssg .Priority=MailPriority.Normal;

SmtpMail.SmtpServer = "mail.abadancity.net";
SmtpMail.Send(smtpMssg );
یا خطا میدهد که رشته ها را اشتباه به کار بردهاید یا میگوید که reject شده است یا.....ایا ممکن است به خاطر نداشتن اکسس به میل سرور باشد ؟چگونه میتوانم این مورد را تست کنم.؟
باتشکر

**titbasoft** · جمعه 11 آذر 1384, 09:22 صبح

اگر mail server شما نیاز به smtp authentication داشته باشه باید از کد های ذکر شده استفاده کنید

**mostafa612003** · شنبه 12 آذر 1384, 08:08 صبح

لطفا یک نفر جواب بدهد

**mostafa612003** · دوشنبه 21 آذر 1384, 11:12 صبح

سلام
می شود به صورت asp هم این کد را بنویسید

**hassan_RK** · پنج شنبه 27 بهمن 1384, 16:57 عصر

با سلام خدمت آقای راد
بعد از کپی فایلهای ذکر شده در پوشه bin و اضافه کردن فایلها از references عینا کد زیر را کپی کردم که در خطی که علامت سئوال گذاشتم ( ADODB.Fields ) خطا می دهد . لطفا راهنمایی بفرمائید.



 Dim cdoSendUsingMethod As String = "http://schemas.microsoft.com/cdo/configuration/sendusing"

        Dim cdoSMTPServerPickUpDirecory As String = "http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory"

        Dim cdoSMTPServer As String = "http://schemas.microsoft.com/cdo/configuration/smtpserver"

        Dim cdoSMTPServerPort As String = "http://schemas.microsoft.com/cdo/configuration/smtpserverport"

        Dim cdoSMTPConnectionTimeout As String = "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"

        Dim cdoSMTPAuthenticate As String = "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"

        Dim cdoSendUserName As String = "http://schemas.microsoft.com/cdo/configuration/sendusername"

        Dim cdoSendPassword = "http://schemas.microsoft.com/cdo/configuration/sendpassword"



        Dim objMM As CDO.Message = New CDO.Message

        Dim Flds As ADODB.Fields = objMM.Configuration.Fields ???????????????



        Flds(cdoSendUsingMethod).Value = CDO.CdoSendUsing.cdoSendUsingPort

        Flds(cdoSMTPAuthenticate).Value = CDO.CdoProtocolsAuthentication.cdoBasic

        Flds(cdoSMTPServer).Value = "localhost"



        Flds.Update()

        objMM.MimeFormatted = True



        objMM.From = "info@yektadev.com"

        objMM.To = "behrouz.rad@gmail.com"



        objMM.Subject = "Welcome!"

        objMM.HTMLBody = "<HTML><HEAD></HEAD><BODY><b>Welcome To My WebSite!</b></BODY></HTML>"



        objMM.Send()

**Behrouz_Rad** · پنج شنبه 27 بهمن 1384, 22:52 عصر

adodb.dll و cdosys.dll و Interop.CDO.dll
البته همه ی سایت ها نیاز به این روش ندارند و به با استفاده از کلاس MailMessage نیز به خوبی کار خواهند کرد.
برخی کدها نیز باید در تعیین Smtp خود به شکل زیر عمل کنند:



SmtpMail.SmtpServer.Insert(0, "localhost")

تجره به بنده ثابت کرده که بهترین روش برای آگاهی از نحوه ی ارسال E_Mail، تماس با تیم ساپورت هاست و تقاضای راهنمایی از آنهاست.

موفق باشید.

**md_bluelily** · شنبه 19 فروردین 1385, 14:40 عصر

آقا یه مشکل جالب.
من یه صفحه فرستادن اطلاعات دارم که وقتی از داخل اون به Yahoo میل میفرستم، میل به inbox من در yahoo میرسه، که این منطقی هست و یعنی داره درست کار میکنه.
ولی وقتی به آدرس خودم در Mail.com یا Gmail میفرستم، میل نمیرسه و هیچ خطایی هم گرفته نمی شه.

آیا کسی راه حلی داره ؟؟؟؟

ممنون.

**md_bluelily** · شنبه 19 فروردین 1385, 15:01 عصر

آقا درست شد.

**rezaei manesh** · دوشنبه 12 تیر 1385, 09:37 صبح

سلام
من هم مشکل آقای hassan_RK رو دارم سر این خط خطا می ده؟!
Dim Flds As ADODB.Fields = objMM.Configuration.Fields
تویه msdn هم جستجو می کنم مباحث مربوط به access رو میاره؟

در ضمن من چطوری بعد از برطرف شدن این خطا چک کنم که برنامه درست کار می کنه می شه بدون آپلود سایت این قسمت رو چک کرد.
من الان متوجه شدم که cdosys ظاهرا برای ویندوز NT نیست؟!!
ویندوز من xp sp2هستش و با vb2003 کار می کنم ، من باید چکار کنم یکی کمک کنه لطفا

**Zarghami_A** · چهارشنبه 14 تیر 1385, 08:31 صبح

اگر دوستان لطف کنند این کدها را برای vs 2005 و زبان #C برای همه کاربران قرار بدهند

**nazaninam** · پنج شنبه 15 تیر 1385, 12:27 عصر

برای ارسال میل در دات نت 2 قبل از هر کاری فضا نام System.Net.Mail را اضافه کنید
این یک تابع هست که میتونید با صدا زدنش راحت ایمیل ارسال کنید
فکر کنم واضح باشه البته برای بعضی قسمتاش توضیح نوشتم
-------------------------------------------VB.NET-------------------------------------------------
کد ها برای زبان وی بی :





    Public Sub sendmail(ByVal subject As String, ByVal mailto As String, ByVal htmltext As String, ByVal mfrom As String, ByVal mailserver As String, ByVal pass As String)



        Dim obj As New SmtpClient

        Dim Mailmsg As New MailMessage

        Mailmsg.To.Clear()



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

        Mailmsg.From = New MailAddress(mfrom)

        Mailmsg.Subject = subject

        Mailmsg.BodyEncoding = System.Text.Encoding.UTF8 ' تعیین کدینگ متن بادی

        Mailmsg.IsBodyHtml = True

        obj.Host = mailserver 'جواب میده mai.yoursite.com  خود که معمولا  smtp server تعیین 

        Dim basicAuthenticationInfo As New System.Net.NetworkCredential(mfrom, pass) ' رو انجام میده پس یوزر نیم و پسورد رو وارد میکنیم Authenticate  این بخش کار 



        obj.UseDefaultCredentials = False



        obj.Credentials = basicAuthenticationInfo



        Mailmsg.Body = htmltext ' این در حقیقت متن بادی است که شما میخواهید بفرستید

        Mailmsg.IsBodyHtml = True ' است و متن ساده  نیست html  تعیین میکند که بادی شما از نوع 

        Try

            obj.Send(Mailmsg)

        Catch ex As Exception



        End Try



    End Sub

-------------------------------------------#C-------------------------------------------------





    public void sendmail(string subject, string mailto, string htmltext, string mfrom, string mailserver, string pass)

    {

        SmtpClient obj = new SmtpClient();

        MailMessage Mailmsg = new MailMessage();

        Mailmsg.To.Clear();

        Mailmsg.To.Add(new MailAddress(mailto));

        Mailmsg.From = new MailAddress(mfrom);

        Mailmsg.Subject = subject;

        Mailmsg.BodyEncoding = System.Text.Encoding.UTF8;

        Mailmsg.IsBodyHtml = true;

        obj.Host = mailserver;

        System.Net.NetworkCredential basicAuthenticationInfo = new System.Net.NetworkCredential(mfrom, pass);

        obj.UseDefaultCredentials = false;

        obj.Credentials = basicAuthenticationInfo;

        Mailmsg.Body = htmltext;

        Mailmsg.IsBodyHtml = true;

        try

        {

            obj.Send(Mailmsg);

        }

        catch (Exception ex)

           

        {

            Response.Write(ex.Message);

        }

    }

**abbas123123** · یک شنبه 23 مرداد 1390, 11:20 صبح

سلام.میشه یکی از اساتید کمک کنه و بگه چطوری میتونم به زبون سی شارپ ارسال و دریافت جمیل رو داشته باشم؟ اگه سورس کد اماده داشته باشین و بذارین خیلی ممنون میشم.

**Saman Hashemi** · یک شنبه 23 مرداد 1390, 11:46 صبح

به اينجا مراجعه كنيد...!

نام تاپیک: آیا در ارسال email مشکل دارید؟

ابزار های تاپیک

نمایش

آیا در ارسال email مشکل دارید؟

آخر سر چه طور می شه یه میل ارسال کرد ؟

Email

سی شارپ لطفا

ارسال ایمیل توسط Asp.Net 2005

نقل قول: آیا در ارسال email مشکل دارید؟

نقل قول: آیا در ارسال email مشکل دارید؟

تاپیک های مشابه

چطوری تو دلفی با اینترنت پروکسی دار میتونم Email بزنم

ایجاد پست الکترونیکی (email ) در شبکه

ارسال و مدیریت email در ++vc

قوانین ایجاد تاپیک در تالار