envoyer un mail avec pièce jointe en dur.

envoyer un mail avec pièce jointe en dur. - VB/VBA/VBS - Programmation

Marsh Posté le 23-06-2015 à 16:57:15    

bonjour,  
 
j'ai un problème avec mon code je voudrais pouvoir ajouter une pièce jointe dans un mail directement depuis l'application que je développe  
 
 

Code :
  1. rivate Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
  2.         Dim smtpServer As New SmtpClient()
  3.         Dim mail As New MailMessage()
  4.         smtpServer.Credentials = New Net.NetworkCredential("email", "mdp" )
  5.         smtpServer.Port = 587
  6.         smtpServer.Host = "smtp.gmail.com"
  7.         smtpServer.EnableSsl = True
  8.         mail = New MailMessage()
  9.         mail.From = New MailAddress("Expéditeur" )
  10.         mail.To.Add("Destinataire" )
  11.         mail.Subject = "Sujet"
  12.         mail.Body = "Message"
  13.         mail.Attachments.Add"C:\Users\dossier\fichier.txt"
  15.         smtpServer.Send(mail)


 
je pense que mon problème viens de mail.Attachments.Add"C:\Users\dossier\fichier.txt"
 
existe t-il une autre fonction pour attacher une pièce jointe directement ?  
 
je reste a votre disposition.


Message édité par en3rgizz le 23-06-2015 à 17:01:54
Reply

Marsh Posté le 23-06-2015 à 16:57:15   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed