عملت نموذج راسلنا في الموقع ليتمكن الزائر من ارسال رسالة الى ايميل الموقع فتظهر لي الرسالة التالية
Mailbox unavailable. The server response was: SPAM not allowed!
والكود هو
Dim smtpClient As SmtpClient = New SmtpClient
Dim message As MailMessage = New MailMessage
Try
Dim fromAddress As MailAddress = New MailAddress("بريد الزائر", "name")
smtpClient.Port = 25
smtpClient.Host = "mail.website.com"
message.From = fromAddress
message.To.Add(info@website.com)
message.Subject = "hi"
message.Priority = MailPriority.High
SmtpClient.Send(message)
Catch ex As Exception
ErrMessage.Text = ("Send Email Failed.<br>" + ex.Message)
End Tryوشكرا
