Dim Mail As New System.Net.Mail.MailMessage
                        '+++ mittente
                        Mail.From = New System.Net.Mail.MailAddress(ConfigurationManager.AppSettings("EmailMailer"), ConfigurationManager.AppSettings("EmailMailer"))
                        '+++ destinatari
                        Mail.To.Add(New System.Net.Mail.MailAddress(Conn.Dati("Email"), Conn.Dati("Email")))
                        '+++ reply address
                        'Mail.ReplyTo = New System.Net.Mail.MailAddress(ConfigurationManager.AppSettings("EmailInformazioni"), ConfigurationManager.AppSettings("EmailInformazioni"))
                        '+++ destinatari in copia carbone
                        'Mail.CC.Add(New System.Net.Mail.MailAddress("info@breakshop.com", "info@breakshop.com"))
                        '+++ destinatari in copia carbone nascosta
                        'Mail.Bcc.Add(New System.Net.Mail.MailAddress("info@breakshop.com", "info@breakshop.com"))
                        '+++ oggetto
                        Mail.Subject = Resources.ResourceMsg.MailSubjectModuloContatti
                        'Mail.SubjectEncoding = System.Text.Encoding.GetEncoding("iso-8859-15")
                        '+++ corpo del messaggio
                        Mail.Body = strTestoNL
                        'Mail.BodyEncoding = System.Text.Encoding.GetEncoding("iso-8859-15")
                        Mail.IsBodyHtml = True
                        '+++ allegato
                        'Mail.Attachments.Add(New System.Net.Mail.Attachment("percorso"))

                        '+++ invio
                        Dim ServerMail As New System.Net.Mail.SmtpClient
                        ServerMail.Host = ConfigurationManager.AppSettings("HostEmail")
                        ServerMail.Port = ConfigurationManager.AppSettings("EmailPort")

                       ServerMail.Send(Mail)