Discussion :

[bytedigger]

Bonjour à tous,

je souhaite savoir s'il y a un bout de code quelque part qui explique comment attacher une pièce joint à un mail a partir de VB.

Nota: ch'ais grace a ce forum comment lancer des emails avec VB

Merci de votre aide

[grafikm_fr]

je souhaite savoir s'il y a un bout de code quelque part qui explique comment attacher une pièce joint à un mail a partir de VB.

Les attacher avec quoi? Outlook? Notes? Directement? Avec SMTP?
Sois plus précis stp...

[bytedigger]

Bonjour grafikm_fr et merci
En fait ma question est valable d'une manière générale, cependant le mode "directement" si pas de messagerie (si possible) :o

merci

[yokiyok]

Salut, moi j'ai deja utiliser le controle MAPI et ca marche pas mal je te met le bout de code corresponant pour que tu vois comment ca marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
 
Dim User As String
Dim Pass As String
Dim Mail As String
 
User = Text1.Text
Pass = Text2.Text
Mail = Text3.Text
MAPISession1.NewSession = True
MAPISession1.DownLoadMail = False
MAPISession1.UserName = User
MAPISession1.Password = Pass
MAPISession1.SignOn
MAPIMessages1.MsgIndex = -1
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.RecipDisplayName = Mail               'Destinataire
MAPIMessages1.MsgSubject = "Un petit bonjour"       'Objet
MAPIMessages1.MsgNoteText = "Salut."                'Texte
MAPIMessages1.AttachmentPathName  "c:\Temp\"& "fichiertest.txt"    
'pièce jointe
MAPIMessages1.Send
MAPISession1.SignOff

bye bye

[bytedigger]

Merci bcp à tous...a tchao