Email visual basic gmail提交不起作用

我有下面一段代码，它似乎不起作用。错误消息位于代码下方

Dim smtpserver As New SmtpClient()
        Dim mail As New MailMessage()
        smtpserver.Credentials = New Net.NetworkCredential("myemail@gmail.com", "mypassword")
        smtpserver.Port = 465
        smtpserver.Host = "smtp.gmail.com"
        mail = New MailMessage()
        mail.From = New MailAddress("myemail")
        mail.To.Add("myemail@gmail.com")
        mail.Subject = "Test"
        mail.Body = "testing "
        smtpserver.Send(mail)
        MsgBox("Mail Sent")

以下是错误消息：

The SMTP server requires a secure connection or the client was not authenticated.
The server response was:
5.7.0 Must issue a STARTTLS command first.
w6sm4604909qas.26 - gsmtp

---

这是什么意思？为什么这不起作用？

Gmail不接受未加密和/或未经验证的电子邮件提交。您的代码需要使用

STARTTLS

如错误消息所述，并在尝试发送任何内容之前进行身份验证。

鉴于您的代码通常是电子邮件链中最小的部分，因此无法回答您的“问题”。你的代码可能很完美，但你的电子邮件被其他系统扔进了垃圾/垃圾邮件。你会遇到什么错误？添加错误检查代码（阅读文档，他们应该说如何）以找出错误。然后将错误信息添加到问题中。