把這幾個對象看壹下：
POP3。MESSAGES，MESSAGE，ATTS，ATT
過程：
1。先用POP3對象連接郵件服務（當然妳郵箱要開POP設置）並接受到MESSAGES
2。取到MESSAGES後，輪循到MESSAGE對象後。
3。對MESSAGE解析，得到郵件標題，內容，收發人，
4。如果有附件還要對ATTS對象輪循並解析（可以把附件存在本地或寫鏈接）
MESSAGES是信件集
MESSAGE是單封信件
ATTS是附件集
ATT是單個附件
————————————————————————
發信分割線
————————————————————————
拿個別人的回答改了壹下，俺VB幾乎沒用過，只會VB。NET
先註冊DLL
然後VB代碼如下:
Private Sub Command1_Click()
SendMail "標題", "正文"
End Sub
Sub SendMail(Optional ByVal sSubject As String, _
Optional ByVal sBody As String)
Dim jmail
Set jmail = CreateObject("jmail.Message")
jmail.Charset = "gb2312"
jmail.Silent = False
jmail.Priority = 1 '郵件狀態,1-5 1為最高
jmail.MailServerUserName = "XXX" 'Email帳號
jmail.MailServerPassWord = "XXX" 'Email密碼
jmail.FromName = "XXX" '發信人姓名
jmail.From = "XXX@XXX.XXXX" '發郵件地址地址
jmail.Subject = sSubject '主題
jmail.AddRecipient "XXX@XXX.XXXX" '收信人地址
jmail.body = sBody '信件正文
jmail.Send ("smtp.163.com") 'SMTP服務器，如smtp.sohu.com
Set jmail = Nothing
End Sub
全了。FromName 和FROM 建議都用郵件地址，不然有的郵箱不收的