HI,
Hate to say this but, I have a problem that I can not resolve.
In this part of the code is where I get a error for permission. It worked on Saturday. But, when I went back to it today(Sunday) to test before I moved it to my actual project it failed me.
Code:
If oOlItm.Attachments.Count <> 0 Then
For Each oOlAtch In oOlItm.Attachments
'~~> Download the attachment
oOlAtch.SaveAsFile NewFileName & oOlAtch.Filename''Failes here
Exit For
Next
Else
MsgBox "The First item doesn't have an attachment"
End If