资源描述：
《用VBA接收邮件》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、用VBA+Jmail来收发邮件的资料终于在网上搜到关于Jmail收发邮件的好资料！经VBA方法测试已成功！不敢私藏。供大火研究。W3JMail邮件组件是Dimac公司开发的用来完成邮件的发送、接收、加密和集群传输等工作的。w3Jmail组件是国际最为流行的邮件组件之一，当今世界上绝大部分ASP程序员都在使用w3Jmail组件构建邮件发送系统，那是因为w3Jmail组件使用了新的内核技术，使其更加可靠和稳定。一、下面向读者介绍w3Jmail4.3组件的新特性：1、w3Jmail4.3组件重新设计了其内部结
2、构——使用Message对象代替原来的单一对象Jmail.smtpmail发送邮件；2、w3Jmail4.3组件一共有十多个对象（后面将详细介绍）——这些对象中，绝大多数是针对Jmail.Message对象操作的；3、支持从POP3邮件服务器收取邮件；4、支持加密邮件的传输；5、快速发送，一次会话就完成邮件发送；6、还有一个特性就是可以使用w3Jmail4.3组件的集群发送功能一次发送成千上万个邮件，还可以通过邮件合并（mailmerge）对象来个性化邮件。二、Jmail邮件组件的安装及卸载：1、安装跟
3、使用别个组件一样，在使用Jmail邮件组件之前要先安装或注册该组件Jmail.dll。具体注册方法，是先把Jmail.dll文件拷贝到硬盘的某一目录下（如C:JmailJmail.dll），然后执行命令Regsvr32C:JmailJmail.dll即可。2、卸载卸载组件是安装组件的相反动作，可以使用参数/U来卸载已安装的组件，执行命令Regsvr32/UJmail.dll即可。三、详细介绍W3Jmail组件的对象（12个）:1、.POP3对象属性（或方法）说明Connect(Username,
4、Password,Server,Port)连接POP3服务器，断口可选，默认110。DeleteMessages()从邮件服务器上删除所有邮件。DeleteSingleMessage(MessageID)从邮件服务器上删除由MessageID指定的邮件。Disconnect()关闭跟邮件服务器的连接。DownloadHeaders()从邮件服务器上读取所有的邮件头并传递给Messages集合。DownloadMessages()从邮件服务器读取所有邮件。DownloadSingleHeader(Mess
5、ageID)从邮件服务器读取指定的邮件头并传递给Messages集合。DownloadUnreadMessages()从邮件服务器上读取所有未读邮件。2、.Messages对象属性（或方法）说明Clear()清除集合中的所有内容，并不会删除邮件服务器上的任何邮件。Count():Integer返回集合中记录的数目：I=Messages.CountItem(Index):Pointer返回一个Message对象。SetoMsg=Messages.Item(0)3、.Message对象属性（或方法）说明Ad
6、dAttachment(FileName,isInline,ContentType):String给邮件添加一个文件型的附件。isInline设置为True时，添加的这个附件就是一个可嵌入的附件。AddCustomAttachment(FileName,Data,isInline):String给邮件添加一个自定义类型的附件。AddHeader(Xheader,Value)给邮件添加一个自定义邮件头X-Header。AddNativeHeader(Header,Value)给邮件添加一个邮件头。AddR
7、ecipient(emailAddress,recipientName,PGPKey)给邮件添加一个收件人。RecipientName和PGPKey是可选项，RecipientName为收件人姓名，PGPKey给邮件加密。AddRecipientBCC(emailAddress,PGPKey)添加一个邮件暗送人（BCC）地址。AddRecipientCC(emailAddress,recipientName,PGPKey)给邮件添加一个邮件抄送人（CC）地址。AddURLAttachment(bstrU
8、RL,bstrAttachAs,isInline,bstrAuth):String从指定的URL下载文件并添加为邮件附件。参数bstrAttachAs是用来更改添加为邮件附件的文件名。AppendBodyFromFile(FileName)清除邮件正文，并把指定文件的内容作为邮件正文。AppendHTML(Text)从邮件追加HTML格式正文，如例所示：Message.AppendHTML(“
HelloWord
”)Appe
