>Vorrei creare una funzione per inviare in automatico una mail.
>Ho utilizzato il comando System.Net.Mail, però il programma mi
>restituisce sempre l'errore "cassetta postale non disponibile,
>errore del server 5.7.1 ........."
>Come server di posta vorrei utilizzare il nostro server exchange
>di posta interno.
>
> Dim ClientMail As System.Net.Mail.SmtpClient
> Dim Mail_Da As System.Net.Mail.MailAddress
> Dim Mail_A As System.Net.Mail.MailAddress
> Dim Mail As System.Net.Mail.MailMessage
>
> ClientMail = New System.Net.Mail.SmtpClient
>ClientMail.Host = ServerMail 'indirizzo ip sel server di psota
>interno
>
>Mail_Da = New System.Net.Mail.MailAddress(IndirizzoMailInvio,
>"pippo", System.Text.Encoding.UTF8)
>Mail_A = New System.Net.Mail.MailAddress(IndirizzoMailRiceve)
>
> Mail = New System.Net.Mail.MailMessage
> Mail.From = Mail_Da
> Mail.To.Add(Mail_A)
>Mail.Priority = System.Net.Mail.MailPriority.High
>
> Mail.Subject = OggettoMail
> Mail.Body = CorpoMail
>
> ClientMail.Send(Mail)
>
>Qualche idea ?????????
>
>Grazie mille
prima di fare ClientMail.Send(Mail) aggiungi questo:
ClientMail.EnableSsl = True
ClientMail.UseDefaultCredentials = False
ClientMail.Credentials = new System.Net.NetworkCredential("username", "password")
dove al posto di username e password ci devi mettere i valori corretti del tuo account
Cristian Barca