16-01-17, 04:05 PM
السلام عليكم و رحمة الله و بركاته
لارسال الايميل من الهوتميل او الجيميل او غيرها امر سهل
لكن عندما اردت ارسال الرسائل الى العملاء من بريد الاستضافة info@eshre.ly لم استطع ذلك
الاستضافة http://www.eshre.ly
الكود المراد تعديله ان امكن
كود :
لارسال الايميل من الهوتميل او الجيميل او غيرها امر سهل
لكن عندما اردت ارسال الرسائل الى العملاء من بريد الاستضافة info@eshre.ly لم استطع ذلك
الاستضافة http://www.eshre.ly
الكود المراد تعديله ان امكن
كود :
كود :
Imports System.Net.Mail
Public Class Form1
Dim mail As New MailMessage()
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim SmtpServer As New SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("info@eshre.ly", "pass")
SmtpServer.Port = 465
SmtpServer.Host = "ls04.server.ly"
SmtpServer.EnableSsl = False
Try
mail.Priority = Net.Mail.MailPriority.High
mail.From = New MailAddress("no_reply@eshre.ly", "اشتري لي ", System.Text.Encoding.UTF8)
mail.To.Add("sabrizinoubi@hotmail.fr")
mail.Subject = "تأكيد الايميل"
mail.Body = "السلام عليكم"
SmtpServer.Send(mail)
MsgBox("تم الارسال")
Catch ex As Exception
MsgBox("فشل الارسال")
End Try
End Sub
End Class