小弟妹有一個小問題
就是我想要下載outlook的附件
現在已經找到sample code可以下載附件
但是我的附件還是一封mail
然後我想要下載那封mail的附件
現在不知道怎麼做，以下為我的sample code
Sub saveunread()
Dim olApp As New Outlook.Application
Dim nmsName As Outlook.NameSpace
Dim vItem As Object
Set nmsName = olApp.GetNamespace("MAPI")
Set myFolder = nmsName.GetDefaultFolder(olFolderInbox)
Set fldFolder = myFolder.Folders("abc")
For Each vItem In fldFolder.Items
'