I have created this VB but I'm having issues getting it to save to the network so that I can have either Import Agent or Quickfields grab it and process it.
Public Sub saveAttachtoDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
saveFolder = "C:\Temp"
For Each objAtt In itm.Attachments
objAtt.SaveAsFile saveFolder & "\" & objAtt.DisplayName
Set objAtt = Nothing
Next
End Sub
Please note that I am going to change the C:\Temp to a location on the network that IA or QF has rights too.