Foxtable(狐表)用户栏目专家坐堂 → [求助]System.Net.Mail提示发送邮件失败?


  共有3313人关注过本帖树形打印复制链接

主题:[求助]System.Net.Mail提示发送邮件失败?

帅哥哟,离线,有人找我吗?
无我是天机
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:233 积分:2602 威望:0 精华:0 注册:2013/9/2 23:31:00
[求助]System.Net.Mail提示发送邮件失败?  发帖心情 Post By:2021/8/18 10:14:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20210818093754.jpg
图片点击可在新窗口打开查看

同样的项目代码,在本机(环境:win10+.NET Framework3.5)测试是OK的能正常发送邮件,但是在服务器上(环境:win server 2016 standard+.NET Framework4.6 )点击按钮就立即弹出“发送邮件失败”的错误提示?请老师帮忙看看,谢谢!

代码如下:
Dim client As New System.Net.Mail.SmtpClient()
client.Host = "xxxxxx"
client.Credentials = New System.Net.NetworkCredential("fn-hn@xxxx", "Hwdxxxxxx2MDW")
client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network
Dim message As New System.Net.Mail.MailMessage
message.From = new System.Net.Mail.MailAddress("fn-hn@xxxx")
message.To.Add("yy@xxxx")
message.Subject = "李总明天来北京"
message.BodyEncoding = System.Text.Encoding.UTF8
message.IsBodyHtml = True

Dim body As String = "<html><body>内容</body></html>"
Dim content As String = "12345678<font size=7 color=red>12345678</font>"

message.Body = body.Replace("内容", content)

Try
    client.Send(message)
    msgbox("发送成功")
Catch ex As Exception
    msgbox("发送失败:" & ex.message)
End Try

 回到顶部
帅哥哟,离线,有人找我吗?
无我是天机
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:233 积分:2602 威望:0 精华:0 注册:2013/9/2 23:31:00
  发帖心情 Post By:2021/8/18 17:07:00 [显示全部帖子]

谢谢蓝老师。应该不是端口问题。如果是端口问题的话,我本机上测试也应该会出现同样的问题才对。但实际情况时,我本机测试都是OK的,都能成功发送邮件。请老师帮忙分析分析还有没有其他原因呢?

 回到顶部