grazie del link. solo che non mi invia la mail a tutti quanti.
Invia la mail solo al primo indirizzo che si trova nel db.

questo il codice
codice:
        Dim from As New MailAddress("miamail@gmail.com")
        Dim destin As New MailAddress("miamail@gmail.com")
        Dim mail1 As New MailMessage(from, destin)
        mail1.Subject = Oggetto.Text
        mail1.Body = Corpo.Text
        Dim bcc As New MailAddress(destinatari)
        mail1.Bcc.Add(bcc)
        
        Dim Aut As New System.Net.NetworkCredential("miamail@gmail.com", "pass")
        Dim mailClient1 As New SmtpClient("smtp.gmail.com", 587)
        mailClient1.EnableSsl = True
        mailClient1.UseDefaultCredentials = False
        mailClient1.Credentials = Aut
        Console.WriteLine("c", destin.DisplayName, mail1.Bcc.ToString())
        Try
            mailClient1.Send(mail1)
        Catch ex As Exception
            Console.WriteLine("Exception caught in CreateBccTestMessage(): {0}", ex.ToString())
        End Try
XKE??????????????