السلام عليكم
كيفية عمل صفحه (مثلا نصوص دعائية ) تقوم بارسال بريد للأعضاء المسجلين بالموقع عبر البريد المسجل داخل الداتا بيز
السلام عليكم
كيفية عمل صفحه (مثلا نصوص دعائية ) تقوم بارسال بريد للأعضاء المسجلين بالموقع عبر البريد المسجل داخل الداتا بيز
وعليكــم السـلام ورحمة الله وبركاتـه..
هل تسأل عن الآلية أم طريقة ارسال بريد الكتروني؟
هل تقوم بجمع البريد الاكتروني من الأعضاء؟
اقتباسمساحة تبدأ من 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
نعم يوجد جدول مخزن به بريد الأعضاء
واريد ارسال رساله نصيه لهم جميع من خلال الفورم
؟؟؟
السلام عليكم
الأخوة الكرام
هل توجد أي طريقة لعملية الأرسال
مع شكري لكم
شوف المقالات التالية:
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
بالتوفيق
اقتباسمساحة تبدأ من 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
السلام عليكم
هذا الكود اخي يستخدم لإرسال البريد الالكتروني
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
اللهم ارزقنا فهم النبيين وحفظ المرسلين
الشركة التطبيقية لخدمات الحاسب الالي [حاسب]
مشكور أخي الكريم على الكود وبارك الله فيك
لكن باقي حاجه مهمة وهى الحقل الخاص بالبريد فى الداتا بيز كيف يمكن الأرسال له
وكتابة الكود الخاص به
الأخ الكريم / smiling4ever
بارك الله فيك لقد تمت بحمد الله
أشكرك جدا على مجهودك
ربنا يوفقك
أخ هاني ممكن توضح لنا ,,
أو أي مقال استفدت منه ..
وشكرا
يمكنك مراجعه هذه الروابط
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
جميعها أفادت بالموضوع وتنفيذه
السلام عليكم
لقد قمت بتجربة الكود على الجهاز وهو يعمل تماما ويقوم بارسال البيانات
لكن عند وضعه على السيرفير يعطي رسالة خطا
الكود المستخدم
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
السلام عليكم ورحمه الله وبركاته
كل عام وجميع الأعضاء والمشرفين بخير وأضحي مبارك على الأمة الأسلامية
هل من حل لهذه المشكلة
الملقم الخاص بالإستضافة التي ترفع عليها الموقع يطلب مصادقة ، أي أنه يحتاج إلى أن تزوده بمعلومات حساب لديه لكي تستطيع الإرسال ....
يفضل أن تستخدم 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
أخى الكريم
مشكور جدا على الأجابة
لكنني أستخدم VB2003
وعند كتابة الكود يعطي خطأ عند كتابته
Dim client As New System.Net.Mail.SmtpClient("mail.mydomain.com")
client.Credentials = new NetworkCredential("myaccount@mydomain.com" , "p@ssword"") client.Send(message)
حاولت لكن بدون فائده
لو قلت ذلك من الصبح :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
مشكور أخى الكريم م. حسام فيصل
بجد اشكرك جدا على مجهودك وتعبك معايه
بس لو أمكن مثال لأنى مش عارف أستخدم الكلاس ده
مع الشكر