PB AJOUT PIECE JOINTE

Bonjour à tout le monde !

Sur ce code:

With SS
    .DownLoadMail = False
    .LogonUI = True
    .SignOn
    logon = True
    .NewSession = True
    bnewsession = .NewSession
    MM.SessionID = .SessionID
End With
MM.Compose
MM.Send True
With SS
    .SignOff
    .NewSession = False
    bnewsession = .NewSession
End With

la fenêtre de nouveau mail avec outlook express s'ouvre bien. Mais je voudrais ajouter une pièce jointe située à un endroit bien précis. J'ai essayé de le faire mais je n'y arrive pas. Quelle ligne faut il ajouter pour qu'il y ait une pièce jointe, et ou insérer cette ligne dans mon code ?

Merci de votre aide

J'avais trouver un code sur ce site qui simulait la saisie des touches avec les raccourcis claviers et ça marche très bien, même si c'est tiré par les cheveux.

Recherche bien, il y a plein de posts sur ce sujet.

               For i = 0 To LsPièceJointe.ListCount - 1
                 .AttachmentIndex = i 'le numéro d'index correspond au nombre supplémentaire de pièces jointes
                 .AttachmentPathName = LsPièceJointe.List(i) '(i + 1) 'ici la pièce jointe supplémentaire
               Next i