Sub SaveAttachement(Item As Outlook.MailItem)
Set attachs = Item.Attachments
For Each attach In attachs
file = attach.FileName
attach.SaveAsFile "http://Sharepoint." & file '<=== correspond au dossier dans lequel je veux sauvegarder les pièces jointes
Next
End Sub
i was try abot this script but no work