منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

ولكن بفاصل زمني محدد عن طريق اداه TrackBar هل من الممكن مساعدتي في ذلك 
المشروع والمرفق موجود
PHP كود :
    Function SendEmail(ByVal Msg As String) As Boolean
        Dim emailMessage 
As New System.Net.Mail.MailMessage()
        Try
            emailMessage.From = New System.Net.Mail.MailAddress("ايميل المرسل اليه")
            emailMessage.To.Add("ايميل المرسل اليه")
            emailMessage.Subject " عنوان الايميل"
            emailMessage.IsBodyHtml True
            emailMessage
.Body Msg
            Dim SMTP 
As New System.Net.Mail.SmtpClient("smtp.gmail.com")
            SMTP.Port 587
                       SMTP
.Host "smtp.gmail.com"
            SMTP.EnableSsl True
            SMTP
.Credentials = New System.Net.NetworkCredential("ايميل المرسل""كلمة مرور ايميل المرسل")
            SMTP.Send(emailMessage)
            Return True
        
Catch ex As Exception
            MsgBox
(ex.MessageMsgBoxStyle.Critical"Error")
            Return False
        End 
Try
    End Function