problème application e-mail

Version imprimable

salut !
Je veux créer une application e-mail
J'ai commencé par un test mais ca na pas marché
il me dit toujours :

Citation:

l’exception StmpExepition n'a pas été gérée

et voila le code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Imports System.Net.Mail
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim mail As New MailMessage
        mail.Subject = "salut"
        mail.To.Add("example")
        mail.From = New MailAddress("example")
        mail.Body = "svp aidez moi"
 
        Dim smtp As New SmtpClient("smtp.mail.yahoo.com")
        smtp.EnableSsl = True
        smtp.Credentials = New System.Net.NetworkCredential("email", "mot de passe")
        smtp.Port = 465
        smtp.Send(mail)
    End Sub
End Class

merci

16/08/2011, 15h46
Meiteisho

Bonjour

Commence par mettre un Try...Catch autour de ton code afin de voir exactement d'où viens ton erreur.

Ensuite faudrait peut être passer EnableSSl a false, ca dépend des serveurs mail il me semble.
16/08/2011, 15h58
zodiag

le même problème ! échec d'envoi ! et quand j'ai mis catch...try , l'application est devenu inutile , je clique sur le bouton d"envoi et rien ne se passe !
16/08/2011, 16h09
Nathanael Marchand

Citation:

Envoyé par zodiag

le même problème ! échec d'envoi ! et quand j'ai mis catch...try , l'application est devenu inutile , je clique sur le bouton d"envoi et rien ne se passe !

L'interet du try catch est d'attraper l'exception pour avoir plus de détails...
La base du debugging est de lire le détails de l'exception pour comprendre ce qu'il s'est passé.
16/08/2011, 16h14
zodiag

Citation:

Envoyé par Nathanael Marchand

L'interet du try catch est d'attraper l'exception pour avoir plus de détails...
La base du debugging est de lire le détails de l'exception pour comprendre ce qu'il s'est passé.

merci...mais quand j'ai mis try ..catch rien n'était attrapé ^^
d'ou viens le problème 8O

Bonjour,
Je ne sais pas si tu le sais, mais pour "attraper" une exception:
Code:

1 2 3 4 5 6 7 try [...] Catch ex as system.exception msgbox(ex.source) msgbox(ex.message) msgbox(ex.InnerException.Tostring) End try
Par exemple...

16/08/2011, 16h24
zodiag

merci..je le sais ! mais le probleme vien de

Code:

smtp.Send(mail)

et il me dit

Citation:

l’exception StmpExepition n'a pas été gérée....échec d'envoi
16/08/2011, 16h35
Chapeau_Bas

Je pense que cela doit venir de tes identifiants, de ton host ou autre. (Une de tes variables) car j'ai exactement le même code que toi dans plusieurs de mes programmes, et cela fonctionne.

Après, où est l'erreur, je ne peux pas t'aider plus que cela, désolé.
Bonne chance.

Ps:
A deux différences près:
Je ne spécifie pas le numéro de port.
Je ne spécifie pas le enablessl.
16/08/2011, 16h46
zodiag

merci :) :) :) ca marché ! j'ai enlevé enablessl et le port! :)
merciiiiii beaucouppp !