[Ana Muslim]

السلام عليكم 

اخواني الاعزاء انا كنت قد نشرت للمتابعين بأني سأصدر الاصدار الجديد 

من برنامج اذاعة القران الكريم في 8\1 و انا حاب اضيف 

فورم ليتمكن المتابع من ارسال الرسائل لي من خلال الادوات اللازمة

انا عملت الكود هذا بس ما اشتغل و هو خالي من الاخطاء

رجاءاً الافادة ان امكن بكود يعمل 

مع خالص الشكر و التقدير 

العضو الجديد

ابن بغداد

كود :

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 AhMaD As New MailMessage
       Try
           AhMaD.From = New MailAddress(mail.Text)
           AhMaD.To.Add("مسحت الايميل عذراً")
           AhMaD.Subject = "My Program"
           AhMaD.Body = "Subject : " + TextBox1.Text + "   Massage : " + TextBox2.Text
           smtp.Credentials = New System.Net.NetworkCredential(mail.Text, pass.Text)
           smtp.Send(AhMaD)
           MsgBox("تم الارسال بنجاح")
       Catch ex As Exception

       End Try
   End Sub

   Private Function smtp() As Object
       Throw New NotImplementedException
   End Function

End Class

[ahmedabdelaliem]

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

اخي توجه الى قسم الدوت نت

هذا قسم فيجوال بيسك 6

[Ana Muslim]

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

اخي توجه الى قسم الدوت نت

هذا قسم فيجوال بيسك 6

شكراً اخي للتنبيه , لاني عضو جديد لا اعرف تقسيم الموقع 

و لا اعلم اصلا كيف انقل الموضوع 

على اي حال الله يحفظك 

[abulayth]

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

اخي توجه الى قسم الدوت نت

هذا قسم فيجوال بيسك 6

تم نقل الموضوع الى القسم المناسب شكرا لك