A voir également:
- Envoi d'email avec VB.net 2003
- Comment creer un compte email - Guide
- Office 2003 - Télécharger - Bureautique
- Programmer envoi sms - Guide
- Programmer envoi mail gmail - Guide
- Facebook piraté et adresse email changé - Guide
3 réponses
Dim Mail As New Net.Mail.MailMessage("from@from.fr", "to@to.fr", "Sujet du Mail", "Contenu du Mail")
Dim MailSender As New Net.Mail.SmtpClient("smtp.fournisseur.fr", 25)
MailSender.Send(Mail)
En redefinissant les champs From avec ton Mail, To avec celui du destinataire, et "smtp.fournisseur.fr" avec le SMTP du tient
Bonne chance
Dim MailSender As New Net.Mail.SmtpClient("smtp.fournisseur.fr", 25)
MailSender.Send(Mail)
En redefinissant les champs From avec ton Mail, To avec celui du destinataire, et "smtp.fournisseur.fr" avec le SMTP du tient
Bonne chance
Finalement j'ai fignoler avec Mayzz un code qui finalement a marché (pour ceux qui voudront le consulter, il faudra savoir que je suis en Tunisie et que le fournisseur internet de la boîte est Globalnet. Donc il vous suffira de changer le smtp. Exemple : pour gmail vous mettez smtp.gmail.com)
Voici le code : avec VB.NET 2008
Voici le code : avec VB.NET 2008
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim mail As New MailMessage()
'set the addresses
mail.From = New MailAddress("contact@prodit.net")
mail.To.Add("joedassin87@gmail.com")
'set the content
mail.Subject = "sujet de mail"
mail.Body = "le body du mail."
Dim client As New SmtpClient("xsmtp.gnet.tn")
Try
client.Send(mail)
MsgBox("coucou ca va")
Catch ex As Exception
MsgBox("Echec de l'envoi")
End Try
End Sub