VBA to Copy email from read only folder to a local folder

[Clifford]

Right now I need to have write permissions on a folder to be able to copy a
message to another folder since the message copy command makes a local copy,
and then I can use the message move command on that copy to move it to the
new folder. Is there a way to copy a message to another folder without having
read permission on the source folder.

Private Sub CopyMailToCacheFolder(ByVal i As MailItem)
Dim copyOfMail As MailItem

If i.Permission = olPermissionTemplate Then
Exit Sub
End If

Set copyOfMail = i.Copy
copyOfMail.Subject = i.ConversationTopic
Dim o As Object
Set o = copyOfMail.Move(m_OutlookCacheFolder)
End Sub

Thanks
Clifford

 

[Ken Slovak - [MVP - Outlook]]

No, if you have no permissions to read items in the folder then you can't
read any items in that folder.