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

ارسال بريد الى الأعضاء المسجلين على الموقع

بدأه هانى جلال في 11 أكتوبر 2009 · 15 رد · 1,439 مشاهدة · في ASP.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

كيفية عمل صفحه (مثلا نصوص دعائية ) تقوم بارسال بريد للأعضاء المسجلين بالموقع عبر البريد المسجل داخل الداتا بيز

#2

وعليكــم السـلام ورحمة الله وبركاتـه..

هل تسأل عن الآلية أم طريقة ارسال بريد الكتروني؟

هل تقوم بجمع البريد الاكتروني من الأعضاء؟

logo.gif
استضافة ويندوز


اقتباس

مساحة تبدأ من 2000 ميجا بايت بسعر 1.99 دولار شهريا.ا

اقتباس

ASP.NET 1.1-2.0-3.0-3.5-4.0-4.5.1 / MVC ASP.NET / PHP 5.x / ColdFusion / MSSQL 2008 & 2012 / MYSQL

#3

نعم يوجد جدول مخزن به بريد الأعضاء

واريد ارسال رساله نصيه لهم جميع من خلال الفورم

؟؟؟

#4

السلام عليكم

الأخوة الكرام

هل توجد أي طريقة لعملية الأرسال

مع شكري لكم

#5

شوف المقالات التالية:

http://www.stardeveloper.com/articles/disp...0201&page=1

http://www.beansoftware.com/ASP.NET-Tutori...ass-Emails.aspx

http://www.tutorio.com/tutorial/sending-ma...sletter-asp-net

بالتوفيق

logo.gif
استضافة ويندوز


اقتباس

مساحة تبدأ من 2000 ميجا بايت بسعر 1.99 دولار شهريا.ا

اقتباس

ASP.NET 1.1-2.0-3.0-3.5-4.0-4.5.1 / MVC ASP.NET / PHP 5.x / ColdFusion / MSSQL 2008 & 2012 / MYSQL

#6

السلام عليكم

هذا الكود اخي يستخدم لإرسال البريد الالكتروني

String subject = TextMailSubject.Text;
			String textBody = Server.HtmlEncode(TextBody.Text); //لضمان عدم وجود سكربت
			String attachment = String.Empty;
			String from ="Email Account that you send from";
			String mailServer ="Server IP or name that will use for sending";
			String mailPort ="Server Port";
			String mailAccount = "User name its often like Email that you will send from"
			String mailPassword = "Password of mail Account"
			String to="Destnation Email";
MailMessage message = new MailMessage(from, to, subject, Server.HtmlDecode(textBody));
  message.IsBodyHtml = true; //To send message in HTML formte if you have images -background color
//If there an attachments
attachment = FileUploadAttachment.PostedFile.FileName;
						message.Attachments.Add(new Attachment(attachment));

SmtpClient smpt = new SmtpClient(mailServer, int.Parse(mailPort));
				smpt.DeliveryMethod = SmtpDeliveryMethod.Network;
				smpt.UseDefaultCredentials = true;
				smpt.Credentials = new NetworkCredential(mailAccount, mailPassword);

				try
				{
					smpt.Send(message);
			   }
				catch (Exception ex)
				{
					MsgBox1.alert(ex.Message);
				}

تم تعديل هذه المشاركة بواسطة hock في 14 أكتوبر 2009 في 08:34

اللهم ارزقنا فهم النبيين وحفظ المرسلين

Hock341@yahoo.com

الشركة التطبيقية لخدمات الحاسب الالي [حاسب]

http://www.hasib.com.sa

مدونتي

#7

مشكور أخي الكريم على الكود وبارك الله فيك

لكن باقي حاجه مهمة وهى الحقل الخاص بالبريد فى الداتا بيز كيف يمكن الأرسال له

وكتابة الكود الخاص به

#8

الأخ الكريم / smiling4ever

بارك الله فيك لقد تمت بحمد الله

أشكرك جدا على مجهودك

ربنا يوفقك

#9

أخ هاني ممكن توضح لنا ,,

أو أي مقال استفدت منه ..

وشكرا

#11

السلام عليكم

لقد قمت بتجربة الكود على الجهاز وهو يعمل تماما ويقوم بارسال البيانات

لكن عند وضعه على السيرفير يعطي رسالة خطا

الكود المستخدم

If Subject.Text <> "" Then

Try

Dim con As New System.Data.SqlClient.SqlConnection

con.ConnectionString = connectionstring

Dim adp As New System.Data.SqlClient.SqlDataAdapter("select * from Tabel3", con)

Dim dt As New System.Data.DataTable

adp.Fill(dt)

For i As Integer = 0 To dt.Rows.Count - 1

Dim mailMessage As New MailMessage

mailMessage.BodyEncoding = System.Text.Encoding.GetEncoding("windows-1256")

HttpContext.Current.Response.ContentEncoding = System.Text.Encoding.UTF8

mailMessage.From = "info@domin.com"

mailMessage.To = dt.Rows(i).Item("mail")

mailMessage.Subject = Subject.Text

mailMessage.BodyFormat = MailFormat.Html

mailMessage.Body = Body.Text

SmtpMail.SmtpServer = "mail.domain.com"

SmtpMail.Send(mailMessage)

Next

res.Text = "تمت عملية الأرسال بنجاح"

uaser()

Catch ex As Exception

Response.Write(ex.Message)

End Try

Else

res.Text = "لا توجد بيانات مدخله"

end if

رسالة الخطأ التى تظهر

‏‏رفض الملقم عنوان أو أكثر من عناوين المستلم . وكانت استجابة الملقم 503 This mail server requires authentication when attempting to send to a non-local e-mail address. Please check your mail client settings or contact your administrator to verify that the domain or address is defined for this server

#12

السلام عليكم ورحمه الله وبركاته

كل عام وجميع الأعضاء والمشرفين بخير وأضحي مبارك على الأمة الأسلامية

هل من حل لهذه المشكلة

#13

الملقم الخاص بالإستضافة التي ترفع عليها الموقع يطلب مصادقة ، أي أنه يحتاج إلى أن تزوده بمعلومات حساب لديه لكي تستطيع الإرسال ....

يفضل أن تستخدم SmtpClient في عملية الإرسال بالشكل التالي :

dim client as new System.Net.Mail.SmtpClient("mail.mydomain.com")
 client.Credentials = new NetworkCredential("myaccount@mydomain.com" , "p@ssword")
 client.Send(message)

بالتوفيق

تم تعديل هذه المشاركة بواسطة م. حسام فيصل في 2 ديسمبر 2009 في 12:39

#14

أخى الكريم

مشكور جدا على الأجابة

لكنني أستخدم VB2003

وعند كتابة الكود يعطي خطأ عند كتابته

Dim client As New System.Net.Mail.SmtpClient("mail.mydomain.com")

client.Credentials = new NetworkCredential("myaccount@mydomain.com" , "p@ssword"") client.Send(message)

حاولت لكن بدون فائده

#15

لو قلت ذلك من الصبح :lol: ....

هذا مثال لل.net framework 1.5 :

Sub PlainTextAuthentication(ByVal oServer As String, _

ByVal oUser As String, _

ByVal oPassword As String, _

ByVal oSendTo As String, _

ByVal oFrom As String, _

ByVal oSubject As String, _

ByVal oBody As String)

'Declare and build the standard MailMessage

'(See previous example for detail)

Dim oMessage As New MailMessage

oMessage.From = oFrom

oMessage.To = oSendTo

oMessage.Subject = oSubject

oMessage.BodyFormat = MailFormat.Text

oMessage.Body = oBody

'Storing keys to a varible to provide readable code

Dim oAuthenticationKey As String = _

"http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"

Dim oSendUsernameKey As String = _

"http://schemas.microsoft.com/cdo/configuration/sendusername"

Dim oSendPasswordKey As String = _

"http://schemas.microsoft.com/cdo/configuration/sendpassword"

'Add field information for the authentication, username, and password

oMessage.Fields.Add(oAuthenticationKey, "1") 'Enables basic authentication

oMessage.Fields.Add(oSendUsernameKey, oUser) 'Sends the username with the msg

oMessage.Fields.Add(oSendPasswordKey, oPassword) 'Sends the password with the msg

'Set the mail server

SmtpMail.SmtpServer = oServer

'Send the message

SmtpMail.Send(oMessage)

End Sub

لمعلومات آكثر : هنا

تم تعديل هذه المشاركة بواسطة م. حسام فيصل في 2 ديسمبر 2009 في 12:45

#16

مشكور أخى الكريم م. حسام فيصل

بجد اشكرك جدا على مجهودك وتعبك معايه

بس لو أمكن مثال لأنى مش عارف أستخدم الكلاس ده

مع الشكر

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