传输失败连接到服务器

我已经尝试了几乎所有的东西，但不能得到这个工作。我会感谢任何帮助。谢谢传输失败连接到服务器

Imports Microsoft.VisualBasic, System.Net.Mail 

    Shared Sub SendMailHTML(ByVal ToAdd, ByVal FromAdd, ByVal Message, ByVal Subject) 

    Dim mail As New MailMessage() 

    Dim SmtpServer As New SmtpClient() 
    SmtpServer.Host = "smtp.gmail.com" 
    SmtpServer.Credentials = New Net.NetworkCredential("[email protected]", "xxxxxx") 
    SmtpServer.UseDefaultCredentials = False 
    SmtpServer.Port = 465 
    SmtpServer.EnableSsl = True 
    SmtpServer.Timeout = 5000 
    SmtpServer.DeliveryMethod = SmtpDeliveryMethod.Network 

    Try 
     mail.From = New MailAddress("[email protected]") 
     mail.To.Add("[email protected]") 

     SmtpServer.Send(Mail) 
    Catch ex As Exception 
     MsgBox(ex.ToString()) 
    End Try 

End Sub

来源

2013-10-06 rumi

你有没有尝试通过端口25没有SSL发送它？ –

您可以尝试更改gmail的端口为587。并添加try块

mail.Subject= ... 
    mail.Body= ...

（这里补充合适的字符串）

也尝试运行它没有

SmtpServer.UseDefaultCredentials = False 
    SmtpServer.DeliveryMethod = SmtpDeliveryMethod.Network

我可以在C＃中，如果你需要作为工作添加我的代码我不知道VB

来源

2013-10-06 03:54:48

传输失败连接到服务器

回答

相关问题