الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

send email with attachment file using asp.net

مغلق
بدأه omar_sabha في 29 يوليو 2007 · 1 رد · 3,235 مشاهدة · في ASP.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

انا اعمل على بيئة asp.net 2003

اريد مثال على ارسال ايميل ومعه مرفقات باستخدام asp.net 2003

ولكم جزيل الشكر

#2

ألسلام عليكم

Try

			Server.ScriptTimeout = 1000
			Response.Flush()
			Dim MailMessage As New MailMessage
			'//////////////////////////////
			MailMessage.To = TextBoxTo.Text '"mmmm@hotmail.com"
			MailMessage.From = "mmmms@gmail.com"
			MailMessage.Subject = TextBoxSubject.Text '"sSubject"
			' MailMessage.Bcc = "453453224@localhost"
			MailMessage.Cc = TextBoxCC.Text
			MailMessage.Bcc = TextboxBCC.Text
			MailMessage.BodyFormat = MailFormat.Text
			MailMessage.Body = TextBoxBody.Text
			Dim i As Integer = 0
			While i < ListBox1.Items.Count
				Dim MyAttachment As New MailAttachment(ListBox1.Items(i).Text)
				MailMessage.Attachments.Add(MyAttachment)
				i = i + 1
			End While

			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 2
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2  'tells cdo we're using the local smtp service
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com" 'verify that this path is correct
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "’mail@Gmail.com"
			MailMessage.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "asdasdasd"
			SmtpMail.SmtpServer = "smtp.gmail.com"
			SmtpMail.Send(MailMessage)
			MailMessage = Nothing
			Response.Flush()
			Response.Write("Message Sent Successfully")
			lab_err.Text = "Message Sent Successfully"
		Catch ex As Exception
			Response.Write(ex.Message)
			lab_err.Text = ex.Message
		End Try

وأنا الكود ده المشكله أن أنا حاولت أستخدمه مع أكتر من ميل بيفشل كان لازم Gmail علشان يشتغل

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…