السلام عليكــم ورحمـة الله وبركاتــه ،،
انا ساكتب لكم البرمجة التى عندى لتعديها لمن جرب الأرسال
=-------------------------------------
ملاحظة
كل الامثل المتواجدة لم تحل لى المشكلة
المهم انننى عملت فى زر التالي و عملت أعلات عن الإمبوت اللازم هذا فقط
Imports System.Net.Mail
------------------------
التعاريف اللازمة
---------
Private mmMessage As MailMessage
Private scSmtp As SmtpClient
Private Shost As String
Private sDisplayName As String
Private sSender As String
Private MsFrom As String
Private MSTo As String
Private MsMessage As String
Private MsBody As String
----------------------------
الزر الذى به الكود هو
-----------------
MsFrom = "NAME@MAIL.com"
Shost = "mail.MAILSERVER.com"
MSTo = " EMAILTO@MAIL.COM"
MsMessage = "الرسالة ما فيها من نص"
Try
mmMessage = New MailMessage()
'mmMessage.From
mmMessage.To.Add(MSTo)
mmMessage.Subject = "Forget Passord"
mmMessage.Body = MsMessage
scSmtp.Send(mmMessage)
Catch Exc As Exception
MsgBox("Error !!! Try agin")
End Try
-------------------------------------------------
هذا ما لدى ولم ترسل على الإيميل الذى أضعة
لماذا لم أعرف السبب
فما التعديل اللازم لهذا الكود
مع الشكر
