كيفية ادارج خاصية الايميل فى الفيجوال

السلام وعليكم اخي هذا المستند قد يفيدك

موجود في المرفقات

اخى الكريم انا لا ارى اى مرفقات اعذرنى لانى جديد بالمنتدى

اين هى بالظبط

جزاكم الله خيرا

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

اخي جرب الكود التالي

    	Dim textBoxData = From t In Me.Controls.OfType(Of TextBox)()
                      	Order By t.TabIndex
                      	Select t.Text

    	Dim body As String = String.Join(vbCrLf, textBoxData)
    	Dim msg As New MailMessage("from@domain", "to@domain", "Subject", body)
    	Dim server As New SmtpClient("smtp.gmail.com", 587)
    	server.Credentials = New NetworkCredential("username@gmail.com", "password")
    	server.Send(msg)

ولا تنسى تصريح التالي

Imports System.Net.Mail
Imports System.Net

تفضل يا أخي

طريقة ارسال الايميل عن طريق فيجوال بيسك 2008 ويدعم ارسال مرفقات

Send Emails By VB.Net.rar

شكرا يا استاذ محمد فؤاد بس انا مش عايز ابعت ايميل انا عايز البيانات الموجوده فى التكست بوكس كلها توصل لايميل معين

هى فكرة البرنامج واحدة بس انا خبرتى مش جامدة اوى فى البرمجة

جزاكم الله خيرا

اقتباس

اخى الكريم انا لا ارى اى مرفقات اعذرنى لانى جديد بالمنتدى

اين هى بالظبط

جزاكم الله خيرا

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

شكرا اخوانى على مروركم على الموضوع

بس المشكلة ان مافى رسائل بتوصل على البريد

شرح افضل انا عندى 2 تكست بوكس و زرار واحد اريد اى بيانات تدخل فى الـ 2 تكست دول توصلى على البريد الالكترونى

معلش انا تعبتكم معايا

اخوكم يوسف

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

اخي ايش المشكلة في كودي السابق؟!!

VB Helper كتب:

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

اخي ايش المشكلة في كودي السابق؟!!

اخى الكريم انا عملت برنت اسكرين للبرنامج

انا مش عارف المفروض اعمل هنا ايه جربت كتير لكن مش نافع حاجة والصورة توضح اكتر

معلش الخطاء فوق End Sub

الف الف شكر اخوانى تم حل المشكلة

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

اخي النص المكتوب بالاحمر ماهي الا نصوص يمكنك تغيير قيمها!! انصحك بقراءة اساسيات اللغة