Question

我有代码从我的INBOX文件夹中读取邮件。但是，我无法从INBOX以外的文件夹中读取邮件。以下是我的代码，仅用于从我的INBOX中获取邮件。

; display mail but don't delete from mailbox
testmail6 ;
new mailserver,status,err,mailMsg
set mailserver=##class(%Net.POP3).%New()
set mailserver.AttachDir="d:\attach\"  ; need terminating \
set mailserver.StoreAttachToFile=1
write !,"Calling Connect"
set status=mailserver.Connect("Server.com","user","password")
if $$$ISERR(status) do DecomposeStatus^%apiOBJ(status,.err) write !,err(err),! quit
write !,"Calling Fetch to retrieve the oldest message on the server."
set status=mailserver.Fetch(1,.mailMsg,0)
if $$$ISERR(status) do DecomposeStatus^%apiOBJ(status,.err) write !,err(err),! quit
write !,"from="_mailMsg.From
write !,"to="_mailMsg.Headers.GetAt("to")
write !,"date="_mailMsg.Date
write !,"subject="_mailMsg.Subject
write !,"messagesize="_mailMsg.MessageSize
do DumpMessage(mailMsg)
quit

Answer 1

不幸的是，你无法用任何语言进行操作，因为POP3根本不支持任何文件夹，只列出所有崩溃信息。此类文件夹在IMAP中支持，但默认情况下，Cache没有任何使用它的实现你可以找到here一个提供他的IMAP适配器的人，它可以帮助你

如何从INBOX以外的文件夹/子文件夹中获取邮件？

1 个答案: