mail+PJ

Bonjour
Je cherche a envoyer une piece jointe avec le mail, a partir d'access (g commencer par faire une zone de liste sur le formulaire pour specifier le chemin de la pj), car je crois que la methode sendobject ne gere pas les pj.
Aidez moi please!!!!!!!!
Merci d'avance.
Allez bonne prog.

dans access tu dais dans le vb-view :

Tools=>references=>microsoft outlook 9.0 object library

ici 1 example simple :

Dim Outapp As Outlook.Application
Dim oAttachments As Outlook.Attachments
Dim rdv As Variant

Set Outapp = CreateObject("Outlook.Application")
Set rdv = Outapp.CreateItem(Outlook.olMailItem)

rdv.Subject = "jjj"
rdv.Recipients.Add "test@hotmail.Com"
rdv.Body = "jj"
rdv.Attachments.Add "c:\z2.log"
'rdv.Display
'Stop
rdv.Send
Set rdv = Nothing



-------------------------------
Réponse au message :
-------------------------------

> Bonjour
> Je cherche a envoyer une piece jointe avec le mail, a partir d'access (g commencer par faire une zone de liste sur le formulaire pour specifier le chemin de la pj), car je crois que la methode sendobject ne gere pas les pj.
> Aidez moi please!!!!!!!!
> Merci d'avance.
> Allez bonne prog.