Bonjours a tous et merci pour tout dans le passer certains m'ont déjà beaucoup aider.
j'apprends maintenant le vb.net
et je suis confronter a un problème qui me bloque pour le reste du programme..
J'ai beau chercher encore et encore sur des forum, je n'arrive pas a trouver pourquoi je ne peux pas envoyer de mail, alors j'ai l'espoir que vous pourriez m'aider
Email utiliser existe et son a moi,
j'ai bien rentrer mon mot de passe ect
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Imports System.Net
Imports System.Net.Mail
Public Class MAILEXP
    Shared Sub SendMail(ByVal name As String)
        Dim client As New System.Net.Mail.SmtpClient
        Dim message As New System.Net.Mail.MailMessage
        Dim expediteur As String = "@gmail.com"
        client.UseDefaultCredentials = False
        client.Credentials = New System.Net.NetworkCredential(expediteur, "*******")
 
        Try
 
            client.Port = 465
            client.Host = "smtp.gmail.com"
            client.EnableSsl = True
            message.From = New System.Net.Mail.MailAddress(expediteur)
            message.To.Add("@gmail.com")
 
            Dim item As New System.Net.Mail.Attachment("c:\....")
            message.Attachments.Add(item)
 
            message.Subject = "SUJET"
            message.Body = "MESSAGE"
 
            client.Send(message)
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub
End Class
Donc si vous pourriez m'expliquer ce qui ne vas pas, je vous en remercie d'avance