ايجاد خطا در هنگام ارسال ايميل

[SAMARE]

سلام دوستان عزيز

در هنگام ارسال ايميل من با ارور زير مواجه ميشم ممنون ميشم كمك كنيد تا اونو برطرف كنم!!!
Error in processing. The server response was: Requested action aborted: error in processing

در ضمن من از تابع زير براي ارسال ايميل استفاده ميكنم:



Sub SendEmail(ByVal Email As String, ByVal Username As String, ByVal Password As String)

Dim obj As New SmtpClient
Dim Mailmsg As New MailMessage
Mailmsg.To.Clear()
Mailmsg.To.Add(Email)
Mailmsg.IsBodyHtml = True
Mailmsg.From = New MailAddress("Test@YAHOO.Com")
Mailmsg.Subject = "èéêى م ي© ¤§ï§ ¬êں ©ںï ي©ي§ ى «ںêںëى ںïêïé êں©è¢ïëگ"
Mailmsg.IsBodyHtml = True
Dim sr As New StreamReader(Server.MapPath("~/NewPassWord.htm"))
Dim temp As String = sr.ReadToEnd()

temp = temp.Replace("[###Name###]", Username).Replace("[###User###]", Username).Replace("[###Pass###]", Password)
Mailmsg.Body = temp
obj.Send(Mailmsg)

End Sub