تقييم الموضوع :
  • 1 أصوات - بمعدل 1
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كود برنامج ارسال رسايل الى البريد gmail
#1
بعد البحث الكثير والحمد لله تم حل مشكلة الكود



كود :
Imports System.Net.Mail
Public Class mailform
   Dim mail As New MailMessage()
   Private Sub mailform_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Disposed
       End
   End Sub

   Private Sub mailform_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       TextBox2.Text = "ادخل هنا الايميل هو هو"
   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim SmtpServer As New SmtpClient()
       SmtpServer.Credentials = New Net.NetworkCredential("ادخل الايميل الى هيجى عليه الرسائل", "باسورد الايميل")
       SmtpServer.Port = 587
       SmtpServer.Host = "smtp.gmail.com"
       SmtpServer.EnableSsl = True

       mail = New MailMessage()
       Dim addr() As String = TextBox1.Text.Split(",")
       Try
           mail.From = New MailAddress("ادخل هنا الايميل هو هو", "هنا اسم الدعم ", System.Text.Encoding.UTF8)

           Dim i As Byte
           For i = 0 To addr.Length - 1
               mail.To.Add(addr(i))
           Next
           mail.Subject = TextBox3.Text
           mail.Body = TextBox4.Text
           mail.DeliveryNotificationOptions = DeliveryNotificationOptions.OnFailure
           mail.ReplyTo = New MailAddress(TextBox1.Text)
           SmtpServer.Send(mail)
           MsgBox("تم الارسال ")
       Catch ex As Exception
           MsgBox(ex.ToString())
       End Try
   End Sub
End Class


الملفات المرفقة
.rar   New folder (3).rar (الحجم : 59.99 ك ب / التحميلات : 571)
الرد }}}
تم الشكر بواسطة: الراجية عفو ربها , asemshahen5
#2
ماذا تقصد باسم الدعم ؟؟
الرد }}}
تم الشكر بواسطة:
#3
(23-05-16, 02:08 PM)yousef كتب : ماذا تقصد باسم الدعم ؟؟

اسم الدعم الفنى
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  برنامج البحث عن لقطة داخل صورة أخرى Taha Okla 4 1,234 أمس, 04:23 PM
آخر رد: عبدالكريم برشدان
  برنامج صانع الاكواد الاصدار المجاني الجديد aljzazy 27 20,084 14-01-24, 12:39 PM
آخر رد: mahmoued2022
Shocked برنامج مواقيت الصلاة ( الاذان ) alsaher1 5 2,532 25-11-23, 02:57 PM
آخر رد: alsaher1
Star [مشروع] برنامج مبيعات مفتوح المصدر 2018 mohammedvego 174 143,574 18-11-23, 03:01 AM
آخر رد: Darweesh
Thumbs Up [VB.NET] برنامج محاسبي مجاني ( مبيعات - مشتريات - مخزون - حسابات ) مفتوح المصدر توب سوفت 3 7,498 06-11-23, 01:36 AM
آخر رد: Ramzigh
  [مشروع] سورس كود برنامج مبيعات لسه مبتدئ 42 34,751 07-10-23, 07:25 PM
آخر رد: حورس2000
  برنامج لادارة الدروس الخصوصية VB.NET2013& Access moaath.khalaf 16 15,791 19-08-23, 12:22 AM
آخر رد: Ramadan alking
  برنامج بنك الأكواد esawy1 4 1,368 28-07-23, 11:53 AM
آخر رد: karmina2012
Music [VB.NET] سورس كود برنامج إذاعي متطور musalem 0 624 25-06-23, 02:06 AM
آخر رد: musalem
Brick [مشروع] سورس كود برنامج إدارة المخزن MStore بلغة VB.NET musalem 1 1,378 17-06-23, 10:03 AM
آخر رد: atefkhalf2004

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


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