用Jmail+ADODB.Stream來保存已經發送的郵件，發現，可以保存成eml檔案，并且可以看到 發件人、收件人、發送日期、主題等資訊，就是看不到正文（收件人可以看到完整的正文）
用notepad打開看，是有完整的郵件原始資訊的。
請問是什么問題呢？
Set objStream = CreateObject("ADODB.Stream")
With objStream
.Type = 1
.Open
Jmail.Message.SaveToStream objStream
.SaveToFile"d:\test.eml"), 2
.Close
End With
Set objStream = Nothing
uj5u.com熱心網友回復：
Set pop3 = Server.CreateObject("JMail.POP3")Set objStream = CreateObject("ADODB.Stream")
Set msg = pop3.Messages.item(j)
for j=1 to pop3.count
With objStream
.Type = 1
.Open
.Position = 0
msg.SaveToStream objStream
.SaveToFile FilePath, 2
.Close
End With
next
uj5u.com熱心網友回復：
Set pop3 = Server.CreateObject("JMail.POP3")Set objStream = CreateObject("ADODB.Stream")
....................
for j=1 to pop3.count
Set msg = pop3.Messages.item(j)
With objStream
.Type = 1
.Open
.Position = 0
msg.SaveToStream objStream
.SaveToFile FilePath, 2
.Close
End With
set msg=nothing
next
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/127638.html
標籤：VBA