Copier le contenu d'une textBox dans un mail (gmail) vb 2010

cnikel - 28 juin 2013 à 03:51
 cnikel - 30 juin 2013 à 23:25
bonjour je suis deseperé j aurai besoin de copier le contenu d'une textbox et de me l'envoyer par mail javais commence mais il ne marche pas

Dim instance As SmtpException
        Dim mail As New System.Net.Mail.MailMessage
        Dim smtp As New System.Net.Mail.SmtpClient

        With mail
            .Body = TextBox4.Text
            .From = New System.Net.Mail.MailAddress("expediteur@")
            .To.Add(New System.Net.Mail.MailAddress("receveur@"))
            .IsBodyHtml = True
        End With

        smtp.EnableSsl = True

        smtp.Credentials = New System.Net.NetworkCredential("expediteur@", "mot de passe")
        smtp.Host = "smtp.gmail.com"
        smtp.EnableSsl = True
        smtp.Port = 587

        smtp.Send(mail)


il y a un probleme au niveau de la derniere ligne a l'envoi du message

4 réponses

ehjoe Messages postés 728 Date d'inscription samedi 4 avril 2009 Statut Membre Dernière intervention 30 mars 2014 4
28 juin 2013 à 09:11
Bonjour,

Try
      Dim client As New System.Net.Mail.SmtpClient
      Dim DotNetMail As New System.Net.Mail.MailMessage()
      client.Credentials = New System.Net.NetworkCredential("un@deux.fr", "")
      client.Port = 587
      client.Host = "smtp.free.fr"
      client.EnableSsl = False
      DotNetMail.From = New System.Net.Mail.MailAddress("un@deux.fr")
      DotNetMail.To.Add("adresseDestinataire@free.fr")
      DotNetMail.Subject = "Titre du mail"
      DotNetMail.Body = TextBox4.Text
      client.Send(DotNetMail)
      DotNetMail.Dispose()
      client.Dispose()
    Catch err As Exception
      MsgBox("ERREUR " & err.ToString)
      Exit Sub
    End Try
    MsgBox("OK")


Cordialement, Joe.
0
jai teste le cotenu que tu ma cordialement donne et j'obtien une erreur
Erreur system.net.mail.stmpexecpion:le serveur smtp requiere une connexion securisée ou le client n'etait pas identifié.la reponse du serveur etait:5.7.0 must issue a STARTTLS command first. x13sm647405wib.3 -gsmtp a system.net.mailcommand.chekreponse'smtpstatusCode String reponse)a system.net.mail.mailtransport.send.mail(mailAdress sender ,mailaddresscollection recipients,string delivery notify,
stmpfailedreciptienexception& execption)
a system.net.mail.smtpclient.send(mailmessage message)
a "nom de mon projet".form1.webbrowser1_documentcompleted(object sender,webbrowserDocumentcompletedeventargs e)dans "la ou se trouve mon projet"ligne 247 correspond a client.Send(DotNetMail)
0
ehjoe Messages postés 728 Date d'inscription samedi 4 avril 2009 Statut Membre Dernière intervention 30 mars 2014 4
29 juin 2013 à 07:51
Bonjour,

J'ai testé auparavant et ça fonctionnait.
*
- As-tu mis le mot-de-passe ?
- As-tu essayé sur le port 25 (je crois), voir sur le Net ils parlent de ce problème ?
- Les adresse anonymes gmail, Hotmail... ne fonctionnent pas toujours, parfois ça bloque ce genre de transmission directe, utilise des vraies adresses des FAI.
- Commences par tester sur deux adresses réelles de ton FAI, que tu puisses vérifier la réception.

Cordialement, Joe.
0
merci joe en fait pour tous ceux qui ont le même problème que moi la boite mail qu'il faut choisir pour envoyer celle avec le mot de passe c'est celle que tu a avec ta box adresse orange livebox ect (adresse FAI)
0
Rejoignez-nous