ممكن مساعدة في طريقة ارسال Email من جهاز محلي

Imports System.Web.Mail

Dim msg As New MailMessage

msg.From = "any@hotmail.com"

msg.To = "any@hotmail.com "

msg.Subject = "hi"

msg.Body = "boday "

msg.BodyFormat = MailFormat.Text

msg.Priority = MailPriority.Normal

SmtpMail.SmtpServer = ("127.0.0.1")

SmtpMail.Send(msg)

Response.Write("ok")

Dim mailMessage As System.Net.Mail.MailMessage = New System.Net.Mail.MailMessage()

mailMessage.From = New System.Net.Mail.MailAddress("any@yahoo.com")

mailMessage.To.Add(New System.Net.Mail.MailAddress("any@hotmail.com"))

mailMessage.Priority = Net.Mail.MailPriority.High

mailMessage.IsBodyHtml = False

mailMessage.Subject = txtSubject.Text.Trim()

mailMessage.Body = txtBody.Text.Trim()

Dim smtpClient As System.Net.Mail.SmtpClient = New System.Net.Mail.SmtpClient()

smtpClient.Host = "127.0.0.1"

Try

smtpClient.Send(mailMessage)

Catch smtpExc As System.Net.Mail.SmtpException

MsgBox(smtpExc.Message)

Catch ex As Exception

MsgBox(ex.Message)

End Try

End Sub