Foxtable(狐表)用户栏目专家坐堂 → [求助]发送邮件找不到SMTP主机?


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

主题:[求助]发送邮件找不到SMTP主机?

帅哥哟,离线,有人找我吗?
新福星
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1959 积分:15502 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]发送邮件找不到SMTP主机?  发帖心情 Post By:2018/10/18 12:27:00 [显示全部帖子]


m.Host ="smtp.xxxxxxxx.com" 


m.Account = "XXXX.com"    '指定登录邮件服务器的帐号
m.Password = "*****"    '登录邮件服务器的密码
m.from = "XXXX.com"

 

按要求设置了SMTP服务器,使用的是厦门中资源的邮件服务器。

发送邮件时,告警 没有找到SMTP服务器,无法解析远程名称。

 

和中资源技术人员联系,又提供了一个邮件服务器域名,使用这个域名,就没有上述告警了!

但接着出了新问题。异步发送时没有错误提示,但是连续发送邮件时,接收的内容是错的,比如发了五封信,邮箱地址没有错,五个人都能接到。但是内容却是同一个。

使用同步发送 就出错了!报告邮件发送错误! 应该从何查起? 谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1959 积分:15502 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2018/10/18 12:54:00 [显示全部帖子]

1 按2楼测试是正常的;

2 将2楼中的host Account Password From Copy我的程序中,发送就不正常了,出现如下提示.  我的程序是采用循环语句多封发送。发送第一张正常,第二张就出错了。

 


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


 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1959 积分:15502 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2018/10/18 16:34:00 [显示全部帖子]

Dim m As New MailSender

For i As Integer=0 To 5
    m.Host = "smtp.qq.com"
    m.Account = "455189993@qq.com"
    m.Password = "helen6849338."
    m.From = "455189993@qq.com"
    m.To = "31358568@qq.com"
    m.Title = "初jkj完成"
    m.C
    'm.AddAttachments("d:\test.xls")
    'm.AddAttachments("d:\11.xls")   ''如何添加多个附件. 这样只看到最后一个附件而于
    m.Send
Next
msgbox(123)

 

 

测试一下这个代码 就会出错。就是加了一个循环。


 回到顶部