奇怪了,最近用indy作一个邮件群发的程序,但是用163的邮箱作发件箱发邮件,频频出现“blocked by Netease Antispam ”这类错误,并且

  • 主题发起人 主题发起人 milktang
  • 开始时间 开始时间
M

milktang

Unregistered / Unconfirmed
GUEST, unregistred user!
奇怪了,最近用indy作一个邮件群发的程序,但是用163的邮箱作发件箱发邮件,频频出现“blocked by Netease Antispam ”这类错误,并且出错后其他邮件都不能发送了,希望做过此类程序的朋友给予帮助!谢谢 ( 积分: 50 )<br />最近作一个邮件群发的程序,我用的是indy9.0,,但是用163的邮箱作发件箱发邮件,频频出现“blocked by Netease Antispam ”这类错误,并且出错后其他邮件都不能发送了,希望做过此类程序的朋友给予帮助!谢谢
我不是做垃圾邮件群发,只是做一个本单位的邮件互传的程序,但是由于数据&业务量很大所以用循环每次发送大约100封左右的邮件(含附件),但是为什么,总是遭到反垃圾邮件的屏蔽呢。
以前看过一些技术资料说把idmessage.pas注释调某一行后,就可以了,我也这样做了,可是不管用,请高手们仔细讲讲是怎么注释的,是不是我注释的不对。
希望做过邮件群发的朋友们不吝赐教,解决这个困扰我的问题

另外:
有哪位高手用indy开发过邮件服务器程序,希望给予指导 ,power2010 老兄请你给各思路,
怎么把客户端&服务器端进行连列。indy设计邮件服务器的原理,最好提供几本参考的书或者源代码。
谢谢了!
 
最近作一个邮件群发的程序,我用的是indy9.0,,但是用163的邮箱作发件箱发邮件,频频出现“blocked by Netease Antispam ”这类错误,并且出错后其他邮件都不能发送了,希望做过此类程序的朋友给予帮助!谢谢
我不是做垃圾邮件群发,只是做一个本单位的邮件互传的程序,但是由于数据&业务量很大所以用循环每次发送大约100封左右的邮件(含附件),但是为什么,总是遭到反垃圾邮件的屏蔽呢。
以前看过一些技术资料说把idmessage.pas注释调某一行后,就可以了,我也这样做了,可是不管用,请高手们仔细讲讲是怎么注释的,是不是我注释的不对。
希望做过邮件群发的朋友们不吝赐教,解决这个困扰我的问题

另外:
有哪位高手用indy开发过邮件服务器程序,希望给予指导 ,power2010 老兄请你给各思路,
怎么把客户端&服务器端进行连列。indy设计邮件服务器的原理,最好提供几本参考的书或者源代码。
谢谢了!
 
indy设计邮件服务器的原理? 应该就是使用POP3 Server和SMTP Server进行端口监听处理邮件到达和检索邮件的请求吧。
 
高手们,该出手时就出手,助人乃快乐之本!!!
快来解救一个痛苦的人吧
 
怎么会触发反垃圾邮件机制的!
 
把你的程序中与网络通信方面凡是出现Indy字符串(不是Indy对象)的地方全部换掉。163会过滤掉在通信过程中&quot;自称&quot;是Indy组件发来的信件。
 
arhaha你好,感谢你的关注
我已经把idmessage.pass单元中的关于indy常量的地方还掉了,然后重新编译,把dcu文件重新覆盖到lib目录里,但是还是不行。
不过程序中关于indy字符串的地方还没有换
 
关注中,我也想做 邮件群发
 
不要用indy了,我用了indy也老有问题,
Delphi 7中的版本是多少
 
我也出现过这样的问题.. ,, 要给 客户 发 系统邮件 我测试 时 用的是 163 的 信箱 ....,, 你连续 向同一个地址发 同样的邮件 就会出现,,
也没有找到 好的解决办法,,
 
我用的delphi 是version7.0(build4.453),用的indy是9。0
 
我爱163。。。
163的信箱就是好,从来没有垃圾邮件。
 
迈克老狼,我不是发垃圾邮件,是单位(各个省份)均有分公司。每天都要把分公司的大量数据报表汇总道总公司(通过电子有发)
 
把它idmessage.pas放到你的工程里面去,还有个地方要注释掉:
if Length(Headers.Values['Priority']) = 0 then {do not localize}
Priority := GetMsgPriority(Headers.Values['X-Priority']) {do not localize}
else
Priority := GetMsgPriority(Headers.Values['Priority']); {do not localize}
//另外多个邮址用&quot;,&quot;分开.
 
huiyang朋友是把
if Length(Headers.Values['Priority']) = 0 then {do not localize}
Priority := GetMsgPriority(Headers.Values['X-Priority']) {do not localize}
else
Priority := GetMsgPriority(Headers.Values['Priority']); {do not localize}
这些语句全部注释掉吗?
谢谢你的关注
 
不过现在好多邮箱都有反垃圾邮件的机制,把来历不明的邮件当作垃圾邮件处理啊。
 
不过现在好像sian网也采取类似的反垃圾措施。太可恶了。
 
我做的一个邮件群发程序好好的,没有出现你说的情况呢?

indy+d7+winxp
 
kingdeezj,朋友,请你把发邮件的邮箱改为163和新浪的邮箱(我是用多个邮箱轮换群发),并把邮件发给163的邮箱,发上个50封看看。163真是可恶。
 
用POP3和SMTP,我用过很好用的
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部