Errore invio EMAIL

[ivan86]

sto creando una newsletter. quando devo inviare una mail mi da il seguente errore:

Indirizzo del mittente respinto dal server. Risposta del server: 530 5.7.0 Must issue a STARTTLS command first. u9sm12384943muf.9

sto utilizzando Gmail: smtp.gmail.com



cosa devo fare?

[albgen]

l'smtp di google vuole una connessione sicura (TLS) in una certa porta.
Quindi devi inizializzare correttamente gli oggetti...

[ivan86]

ok grazie mille sono riuscito ad inviare una mail ad un mio indirizzo di posta.

visto ke sto implementando una newsletter voglio inviare la mail a più indirizzi. Solo che quando faccio invia mi il seguente errore: The parameter 'to' cannot be an empty string.
Parameter name: to

il mio codice è il seguente:

 
 ' Lancio una query nell'oggetto commando di OleDB - Estraggo tutti gli indirizzi email dal database
        cmd = New OleDbCommand("SELECT email FROM newsletter", cn)
        dr = cmd.ExecuteReader()
        
        Dim destinatari As String = ""
        
        ' Memorizzo in una variabile le email estratte in precedenza
        While (Not dr.HasRows)
            destinatari += dr("email").Value & ","
            dr.NextResult()
        End While
        
        ' Invio la Newsletter
        Dim mail As New MailMessage("mymail@gmail.com", destinatari, Oggetto.Text, Corpo.Text)
        
        mail.IsBodyHtml = False
        Dim mailAut As New System.Net.NetworkCredential("mymail@gmail.com", "password")

dove destinatari sarebbe la stringa con gli indirizzi presenti nel database
solo che è proprio destinatari che non legge.. o non so.. eppure non è vuoto il database..

help me

[albgen]

è sbagliato il modo in cui leggi i dati dal db.
vedi qui un esempio su come fare
http://msdn.microsoft.com/en-us/library/979byfca.aspx

[ivan86]

grazie albgen
ora funziona..
solo che ho notato che quando invio la mail escono tutti gli indirizzi degli altri.
c'è un metodo o un modo per nasconderli?

[albgen]

beh si...
esiste il campo BCC per questo
http://msdn.microsoft.com/en-us/libr...ssage.bcc.aspx

[ivan86]

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

        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??????????????

[albgen]

cioè prima inviava(quando usavi solo TO) e adesso(che usi BCC) no?

[ivan86]

esatto! prima, quando gli indirizzi stavano nel campo To, la mail veniva inviata, ora che stanno nel campo Bcc non invia a tutti.
A Bcc gli passo la stringa con gli indirizzi email, ma invia la mail solamente al primo indirizzo presente nel database

[ivan86]

finalmente ho torvato la combinazione vincente

 
        ' Passo in una variabile le email e invio il messaggio
        If (dr.HasRows) Then
            Do While dr.Read()
                Dim bcc As New MailAddress(dr("email").ToString())
                mail1.Bcc.Add(bcc)
            Loop
            mailClient1.Send(mail1)
        End If