跳到主要内容

获取邮件列表

命令说明

获取邮箱文件夹中的邮件列表,返回为一个数组,数组中的每一项为邮件消息对象

命令原型

arrayRet = IMAP.GetMailList(objIMAP,sFolder,iNum,bOnlyunread,bMarkread,sDecoding)

命令参数

参数必选类型默认值说明
objIMAPTrueexpressionobjIMAP由"连接邮箱"命令返回的可操控连接对象
sFolderTruestring"收件箱"将从其中检索邮件消息的邮箱文件夹,如"收件箱"、"草稿"、"已发送邮件"等文件夹
iNumTruenumber30从列表顶部开始获取的邮件数量,设置0为获取邮箱文件夹中的所有邮件
bOnlyunreadTruebooleanTrue指定是否只检索未读邮箱消息,默认为是
bMarkreadTruebooleanFalse指定是否将已检索的邮箱消息标记为已读,默认为否
sDecodingTruestring""当邮件对象的附件名称等出现中文乱码时,需要设置正确的字符集进行解码,如"gb2312",否则保持默认值为空字符串即可

返回结果

arrayRet,将命令运行后的结果赋值给此变量。

运行实例

/*********************************获取邮件列表***************************************
命令原型:
arrayRet = IMAP.GetMailList(objIMAP,sFolder,iNum,bOnlyunread,bMarkread,sDecoding)
入参:
objIMAP--由"连接邮箱"命令返回的可操控连接对象
sFolder--将从其中检索邮件消息的邮箱文件夹,如"收件箱"、"草稿"、"已发送邮件"等文件夹
iNum--从列表顶部开始获取的邮件数量,设置0为获取邮箱文件夹中的所有邮件
bOnlyunread--指定是否只检索未读邮箱消息,默认为是
bMarkread--指定是否将已检索的邮箱消息标记为已读,默认为否
sDecoding--当邮件对象的附件名称等出现中文乱码时,需要设置正确的字符集进行解码,如"gb2312",否则保持默认值为空字符串即可
出参:
arrayRet--命令运行后的结果
注意事项:
邮箱使用完后及时关闭连接
**********************************************************************************/
Dim objIMAP,arrayRet
// 连接邮箱
objIMAP = IMAP.Connect("imap.qq.com","***@qq.com","*****",143,false,"***@qq.com")

// 获取邮件列表
arrayRet = IMAP.GetMailList(objIMAP,"收件箱",5,true,false,"")
Traceprint(arrayRet)

// 断开邮箱连接
IMAP.Close(objIMAP)

可视化样例