Extraction du contenu d'un message

Bonjour,

Merci pour la r=E9ponse que j'avais eut plus bas.
Mais je n'ai que Outlook Express 6 et je n'ai pas acc=E8s =E0=20
Visual Basic Editeur par Outlook.
Comment puis-je executer cette macro en dehors d'Outlook ?
Ou =E9ventuellement un autre moyen s'il existe pour=20
extraire le contenu d'un message re=E7u dans Outlook tel=20
qu'une image Gif anim=E9e ou un son qu'on ne peut pas=20
r=E9cup=E9rer par le clic droit de la souris (Enregistrer...)

Merci d'avance de vos r=E9ponses

BABOON


Bonjour,

La macro suivante modifi=E9e =E0 partir de celle de l'article:
http://support.microsoft.com/default.aspx?
scid=3Dkb;fr;19961&Product=3Dol2002INT
permet de mettre tous les fichiers attach=E9s dans =20
c:\temp .

Sub Get_Attachment()
Dim attach As Attachment
Dim myitem As Outlook.MailItem

On Error Resume Next

Set myOlApp =3D CreateObject("Outlook.Application")
Set myitem =3D myOlApp.ActiveInspector.CurrentItem
Set attachs =3D myitem.Attachments

For Each attach In attachs
' If attach.DisplayName =3D "SMIME.P7M" Then
attach.SaveAsFile "C:\temp\" & attach.DisplayName
' End If
Next
End Sub

"Baboon" <anonymous@discussions.microsoft.com> a =E9crit=20
dans le message de
news:08b901c3d50e$09fd9ce0$a401280a@phx.gbl...
Bonjour,
Je voudrais savoir comment extraire le contenu d'un
message re=E7u dans Outlook tel qu'une image Gif anim=E9e ou
un son qu'on ne peut pas r=E9cup=E9rer par le clic droit de
la souris (Enregistrer...) Pour certain cas on n'arrive
seulement =E0 r=E9cup=E9rer l'image fixe sans l'animation.
Pourquoi ? ? ?
Et =E9ventuellement avec quel utilitaire d'extraction on
peut le faire ?
Merci d'avance et bonne ann=E9e 2004.

Baboon

.