Envoi d'email avec VB.net 2003

Fermé
hikma - 7 janv. 2008 à 18:40
MohaBaba Messages postés 118 Date d'inscription jeudi 1 juillet 2010 Statut Membre Dernière intervention 27 février 2014 - 4 août 2010 à 12:48
salut

j ai une application et j ai besoin d'envoyer des email
vous pouvez m aider dans le code
merci d'avance
A voir également:

3 réponses

Anotine Messages postés 7 Date d'inscription lundi 7 janvier 2008 Statut Membre Dernière intervention 29 octobre 2008 1
7 janv. 2008 à 18:46
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
1
MohaBaba Messages postés 118 Date d'inscription jeudi 1 juillet 2010 Statut Membre Dernière intervention 27 février 2014 10
27 juil. 2010 à 13:33
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

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
1
ouchayan Messages postés 13 Date d'inscription dimanche 6 septembre 2009 Statut Membre Dernière intervention 12 août 2010
3 août 2010 à 12:01
merci pour le code
0
ouchayan Messages postés 13 Date d'inscription dimanche 6 septembre 2009 Statut Membre Dernière intervention 12 août 2010
3 août 2010 à 12:26
mais vous n'avez pas cité le port de serveur,nom d'utilisateur et le mot de passe??????
merci d'avance
0
MohaBaba Messages postés 118 Date d'inscription jeudi 1 juillet 2010 Statut Membre Dernière intervention 27 février 2014 10
4 août 2010 à 09:14
ce n'est pas nécessaire mais sinon je vais te dégoter la ligne de code qu'il faut mettre
0
MohaBaba Messages postés 118 Date d'inscription jeudi 1 juillet 2010 Statut Membre Dernière intervention 27 février 2014 10
4 août 2010 à 09:23
client.Credentials = New NetworkCredential("*****@gmail.com", "*****")
voila.
Et Forza Taraji!!! (Taraji= Espérance Sportive de Tunis -23 fois champions de Tunisie-))
0
ouchayan Messages postés 13 Date d'inscription dimanche 6 septembre 2009 Statut Membre Dernière intervention 12 août 2010
4 août 2010 à 09:38
je l'ai essayé mais ca marche pas malheuuresement donc esk tu peux m'envoyer l'application que tu'as realisé
merci boco
0
Nico# Messages postés 323 Date d'inscription vendredi 4 janvier 2008 Statut Membre Dernière intervention 28 août 2013 102
7 janv. 2008 à 18:41
Salut il me semble que tu as l'espace de nom Mail a importer donc

Imports System.Net.Mail

ou

Imports System.Web.Mail

je ne sais plus lequel des deux et le bon
0
MohaBaba Messages postés 118 Date d'inscription jeudi 1 juillet 2010 Statut Membre Dernière intervention 27 février 2014 10
27 juil. 2010 à 13:33
Import System.Net.Mail
0