收邮件 如果获取邮件内容 文字的超链接？

ljc0123

收邮件 如果获取邮件内容 文字的超链接？
可以获得文本，但超链接如何获取？

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

.如果真 (获取邮件信息 (个数, 大小) ＝ 假)
    信息框 (“获取邮件信息失败！”, 0, )
    返回 ()
.如果真结束
.计次循环首 (1, i)
    第几封 ＝ 个数 ＋ 1 － i
    邮件信息 ＝ 接收邮件 (第几封)
    表项 ＝ 超级列表框1.插入表项 (, , , , , 第几封)
    b ＝ 邮件信息.取超文本内容 ()
    ' c ＝ 编码_URL解码 (b, 真)
    调试输出 (b)
    超级列表框1.置标题 (表项, 0, 邮件信息.取主题 ())
    超级列表框1.置标题 (表项, 1, 邮件信息.取文本内容 ())
    超级列表框1.置标题 (表项, 2, 邮件信息.取发件人地址 ())
    邮件信息.q
.计次循环尾 ()

ljc0123

这里 如果用.取超文本内容 得到结果就是空  为什么