I have manged to do some changes in the scripting of the Outlook 2003 through which I was comfortably abel to get the attachments directly go inside a folder on my drive. So I would suggest you to ollow this option and make the necessary changes carefully.
Code:
Sub SaveAttachments(myMail As MailItem)
Dim vFrom As String, vSubject As String
Dim vFile As Attachment
vFrom = myMail.ReceivedByName
vSubject = myMail.Subject
If myMail.Attachments.Count > 0 Then
For i = 1 To myMail.Attachments.Count
Set vFile = myMail.Attachments(i)
If LCase(vFile.FileName) Like "*.pdf" Then
vFile.SaveAsFile "C:\Test\" & vFile.FileName
End If
Next i
End If
Set myMail = Nothing
Set vFile = Nothing
End Sub
Bookmarks