[AC-2003] Envoi d'un doc PDFcreator par mail

[ortiz]

Bonjour à tous,

Cela fait un petit moment que je cherche des infos sur la création d'un état en PDF et son envoi par mail.
J'ai bien entendu lu attentivement le papier de Caféine à ce sujet mais je n'ai pas tout compris...
Bref, j'ai trouvé plusieurs infos à ces sujets et j'ai fait ma soupe...
Mais j'ai un problème (évidemment!), mon code ouvre deux mails, l'un avec seulement l'adresse du destinataire, l'autre avec seulement le doc PDF:

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Private Sub C_Email_Click()
Dim stDocName As String
 
    stDocName = "ETA-DEVIS"
    DoCmd.OpenReport stDocName, acViewPreview, , "[IDDevis]='" & Me![IDDevis] & "'"
 
DoCmd.RunCommand acCmdPrint
DoCmd.Close acReport, "ETA-DEVIS"
 
With appwd
 
Dim strDest As String       ' L'adresse e-mail du destinataire
Dim strMessage As String    ' Le corps du message
 
strDest = [C-Email]
If strDest = "" Then Exit Sub
 
SendMail strDest, _
  "Objet:", _
  strMessage, _
  True
    End With
End Sub

Ce code est un évènement sur un bouton dans le formulaire Devis.

J'ai paramétré PDFCreator pour qu'il envoie un mail à la création du document et c'est certainement à cause de ça que j'ai deux mails, mais je ne vois pas comment paramétrer le code VBA pour lui faire joindre automatiquement au mail le doc PDf que je crée...

Pourriez-vous m'aider ?

Avec mes remerciements,
Ortiz

[marsouin_89]

Bonsoir Ortiz,

Pour la création de ton pdf à partir d'un état, tu as le code de Stephan Lebans ici. Son code fonctionne très bien.
Peut être qu'à partir de çà, tu pourras gérer ton problème d'envoi de pièce jointe à ton mail car, pour le coup, c'est toi qui gère la création du pdf avec ce code.

Cordialement

Christophe