使用vb.net 2008发送电子邮件

可能重复：

我想使用VB.NET2008和gmail帐户发送电子邮件。 有人能帮我写代码吗

Dim Msg As New MailMessage

Dim myCredentials As New System.Net.NetworkCredential
myCredentials.UserName = " andreas@absender.de"
myCredentials.Password = "Password"

Msg.IsBodyHtml = False

Dim mySmtpsvr As New SmtpClient()
mySmtpsvr.Host = "smtp.web.de" 
mySmtpsvr.Port = 25

mySmtpsvr.UseDefaultCredentials = False
mySmtpsvr.Credentials = myCredentials

Try
  Msg.From = New MailAddress("andreas@absender.de")
  Msg.To.Add("entchen@empfänger.de")
  Msg.Subject = "Betreff"
  Msg.Body = "Inhalt"
  mySmtpsvr.Send(Msg)
  MsgBox("E-Mail gesendet.", MsgBoxStyle.Information, Title:="Information")
Catch ex As Exception
  MsgBox (Err.Number & ex.Message & ex.StackTrace.ToString) 'Falls ein Fehler auftritt wird eine MsgBox angezeigt
End Try 

---

希望对你有所帮助。

快速的谷歌搜索应该就足够了。如果我选择gmail，我将使用什么主机？PostincomeServer:POP3:pop.googlemail.com（SSL；端口995）IMAP:IMAP.googlemail.com（SSL；端口993）PostOutcome服务器：smtp.googlemail.com（SSL；端口465或587）我终于解决了这个问题。谢谢！！