关于jmail阅读邮件的问题，谢谢！
Set POP3=Server.CreateObject("JMail.POP3")'pop3的连接用户名，密码，pop3地址
POP3.Connect "xxxx","yyyy","pop3.163.com"
Response.Write( "你有" & POP3.count & " 封邮件。<br/><br/>" )
set msg1=server.CreateObject("jmail.message")
If POP3.count > 0 Then
For I=1 To POP3.Count
Subject=POP3.Messages.Item(I).Subject
FromAddress=POP3.Messages.Item(I).From
FromName=POP3.Messages.Item(I).FromName
Response.write "<br/>" & Subject '主题
Response.write "<br/>" & FromAddress '发件人Email
Response.write "<br/>" & FromName '发件人姓名
Response.write "<br/>" & POP3.Messages.Item(I).Date '邮件到达服务器的时间
response.write "<hr>"
Next
End If
EMailID=1
if POP3.Count<EMailID Then
response.write "<center><B style='color=red'>邮件读取失败！！！<br/><br/>邮件可能已经被删除或者被客户端软件收取</B></center>"
response.End
end if
Set TheMsg =POP3.DownloadSingleMessage(1)
MSGBody=TheMsg.Body & " '纯文本内容
MSGBody=Trim(MSGBody)
MSGHTMLBody=TheMsg.HTMLBody & " '超文本内容
MSGHTMLBody=Trim(MSGHTMLBody)
执行至
Set TheMsg =POP3.DownloadSingleMessage(1)
出问题，提示
错误类型：
Microsoft VBScript 运行时错误 (0x800A01B6)
对象不支持此属性或方法: 'POP3.DownloadSingleMessage'
这是怎么回事啊，我搜的网络上都是这样的啊。
