[VB] Ajouter une piece jointe au mail

Résolu/Fermé

turgodi - 5 juin 2012 à 18:40
Utilisateur anonyme - 6 juin 2012 à 22:11

Bonjour,
je souhaiterais rajouter une pièce jointe à mon petit code pour envoyer un email avec gmail :

Public Class Form1

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()
smtpServer.Credentials = New Net.NetworkCredential("email", "mdp")
smtpServer.Port = 587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail = New MailMessage()
mail.From = New MailAddress("Expéditeur")
mail.To.Add("Destinataire")
mail.Subject = "Sujet"
mail.Body = "Message"
smtpServer.Send(mail)
End Sub
End Class

Voilà, tout cela marche très bien mais je n'arrive pas à envoyer une pièce jointe ?

J'ai bien essayé mail.Attachments.add (C:\...)
Mais il m'affiche une erreur "La propriété Attachments est Read Only"

J'aurais besoin d'aide, merci ! :)

A voir également:

[VB] Ajouter une piece jointe au mail
Ajouter une adresse mail - Guide
Yahoo mail - Guide
Vb cable - Télécharger - Audio & Musique
Créer une adresse mail outlook - Guide
Comment récupérer une adresse mail - Guide

5 réponses

Réponse 1 / 5

turgodi
5 juin 2012 à 20:50

svp ?

Réponse 2 / 5

Utilisateur anonyme
5 juin 2012 à 22:21

Bonjour,

essayé :

mail.AddAttachment (C:\...)

C'est ainsi que je procède sous VBS

Cdt

Lupin

Réponse 3 / 5

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
Modifié par lermite222 le 6/06/2012 à 12:01

Bonjour,
je pense qu'il ne faut pas de () et si tu met en "Dur" comme tu semple le montrer il faut des ""
mail.Attachments.add "C:\..."
A+
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.

Réponse 4 / 5

turgodi
6 juin 2012 à 13:14

Merci c'est bon :)

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
Modifié par lermite222 le 6/06/2012 à 21:33

Merci c'est bon :)
C'est quoi qu'est bon ???
Lupin.PC4 -->>
M'étonnerais que ton exemple fonctionne . ?

Utilisateur anonyme
6 juin 2012 à 22:11

re:

cela est tout fait possible, c'est codé à la volé sans testé!

j'aurais du spécifié, je suis désolé, méa culpa.

???

Cdt

Lupin

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 5

Utilisateur anonyme
6 juin 2012 à 13:13

re:

Sous VB.NET, ça me donne ceci :

Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()

smtpServer.Credentials = New Net.NetworkCredential("email", "mdp")
smtpServer.Port = 587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True

mail = New MailMessage()
Dim NomFichier As String = "C:\Document\test.txt"
Dim data As New Attachment(NomFichier)

With mail
	.From = New MailAddress("Expéditeur")
	.To.Add("Destinataire")
	.Subject = "Sujet"
	.Body = "Message"
	.Attachments.Add(data)
End With
smtpServer.Send(mail)

Cdt

Lupin

Discussions similaires

One Piece Kai en streaming ?

Retrouver l'image originale après avoir fait des modifications ?

Télécharger épisodes One Piece

Faire un publipostage par mail avec pièce jointe

One piece Kai vf

Discussions similaires

Newsletters