ส่งอีเมล์ด้วย smtp gmail พอไปเซ็คที่เมล์ไม่ขึ้นชื่อเมล์หรือชื่อคนที่ส่งมา

Dim myMail As New System.Net.Mail.MailMessage()
Dim Cred As New System.Net.NetworkCredential("[email protected]", "xxxxxx")

myMail.To.Add("[email protected]")
myMail.Subject = rdbtnlist.SelectedItem.Text
myMail.From = New System.Net.Mail.MailAddress(emailtextbox.Text, nametextbox.Text)

myMail.IsBodyHtml = True

myMail.Body = "<strong>เรื่อง : </strong>" & rdbtnlist.SelectedItem.Text & "<br />"
myMail.Body &= "<strong>ชื่อ - สกุล : </strong>" & nametextbox.Text & "<br />"
myMail.Body &= "<strong>อีเมล์ : </strong>" & emailtextbox.Text & "<br />"
myMail.Body &= "<strong>ความคิดเห็น/ข้อเสนอแนะ : </strong>" & txtarea.Text & "<br />"

Dim SmtpMail As New System.Net.Mail.SmtpClient("smtp.gmail.com")
SmtpMail.UseDefaultCredentials = False
SmtpMail.EnableSsl = True
SmtpMail.Credentials = Cred
SmtpMail.Send(myMail)
myMail = Nothing