取邮件内容,为啥就只有苏宁的邮件返回空呢?

藏半杯水 · 发表于 2013-10-8 21:23:56

.版本 2
.支持库 pop3
.支持库 spec
.支持库 iconv

.程序集程序集1

.子程序激活邮箱
.局部变量邮箱, 文本型
.局部变量密码, 文本型
.局部变量邮件总数, 整数型
.局部变量邮件大小, 整数型
.局部变量 a, 整数型
.局部变量收到邮件, 邮件信息
.局部变量邮件主题, 文本型
.局部变量邮件文本, 文本型

' 邮箱＝ _启动窗口.超级列表框2.取标题 (0, 0)
' 密码＝ _启动窗口.超级列表框2.取标题 (0, 1)
.如果真 (连接收信服务器 (“pop.163.com”, 110, “kuaijiegang61330@163.com”, “e4062840”, 30000, 3))
.如果真 (获取邮件信息 (邮件总数, 邮件大小))
      调试输出 (邮件总数, 邮件大小)
      .计次循环首 (邮件总数, a)
         处理事件 ()
         收到邮件＝接收邮件 (a)
         邮件主题＝到文本 (编码转换 (到字节集 (收到邮件.取主题 ()), #编码_UTF_8, #编码_GBK, ))
         邮件主题＝选择 (邮件主题＝ “”, 收到邮件.取主题 (), 邮件主题)
         调试输出 (邮件主题)
         .如果 (寻找文本 (邮件主题, “苏宁易购注册确认邮件”, , 假) ≠ -1)
            邮件文本＝到文本 (编码转换 (到字节集 (收到邮件.取超文本内容 ()), #编码_UTF_8, #编码_GBK, ))
            _启动窗口.返回信息.加入文本 (邮件文本)
            调试输出 (真)
            ' 调试输出 (邮件文本)
         .否则
            调试输出 (假)
         .如果结束

      .计次循环尾 ()
      调试输出 (“456”)

就是苏宁的返回不了邮件内容.....什么都可以啊....求救

补充内容 (2013-10-8 21:26):
其他什么国美啊...其他发件人的都可以,求解是什么原因呢

dustys · 发表于 2013-10-8 21:23:57

这种POP收信很奇怪的，有一些是不用转换编码的，楼主试试吧。

补充内容 (2013-10-8 23:09):
直接这样就行：

调试输出 (收到邮件.取超文本内容 ())

宛若晨曦 · 发表于 2013-10-8 21:56:35

测试代码无任何问题，等待楼下解答~ 就是返回为空这个我也不知道。。。

学E语 · 发表于 2013-10-8 22:07:15

返回“空”代表发送成功，如果返回其他文字说明发送失败！

藏半杯水 · 发表于 2013-10-8 22:20:34

学E语发表于 2013-10-8 22:07
返回“空”代表发送成功，如果返回其他文字说明发送失败！

不是很明白啊....可以说得详细些吗

学E语 · 发表于 2013-10-8 22:30:14

藏半杯水发表于 2013-10-8 22:20
不是很明白啊....可以说得详细些吗

你可以测试下自己的邮箱，发送成功的时候返回的是空

藏半杯水 · 发表于 2013-10-8 22:51:58

还是没弄明白楼上的意思,我这是取回标题为"****"的邮件内容,应该不算发送吧别的邮件都是可以成功取回的...这狗日的的苏宁就是不行........等大神解答

ma8803 · 发表于 2013-10-8 23:33:50

邮件有2种模式
1 普通文本
2 超文本

你可以用邮件信息.取文本内容（）测试下

藏半杯水 · 发表于 2013-10-9 04:14:10

ma8803 发表于 2013-10-8 23:33
邮件有2种模式
1 普通文本
2 超文本

射射这位大神....

苏宁果然是不用转码的

藏半杯水 · 发表于 2013-10-9 04:16:02

卧槽....回复错误,正确答案是7楼

[已解决] 取邮件内容,为啥就只有苏宁的邮件返回空呢?

最佳答案

评分

		自动登录	找回密码
密码			注册