Bonjour
j'utilise Vb 2010 pour envoyer un mail à plusieurs personnes via le code ci-dessous.
la ListBox1.Items(i) contient la liste des emails
Ma question: je souhaite que les contacts ne se vois pas enter eux.
Merci


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
Dim myOl As Outlook.Application
            Dim myEmail As Outlook.MailItem
            myOl = New Outlook.Application
 
 
            myEmail = myOl.CreateItem(OlItemType.olMailItem)
 
            For i As Integer = 0 To ListBox1.Items.Count - 1
 
                myEmail.Recipients.Add(ListBox1.Items(i))
 
 
                myEmail.Subject = TextBox1.Text
                myEmail.Body = TextBox2.Text
                If TextBox3.Text = "" Then
                Else
                    myEmail.Attachments.Add(TextBox3.Text)
                End If
 
            Next
            myEmail.Send()