<WebMethod()> _
    Public Function invia_mail(ByVal nome As String, ByVal oggetto As String, ByVal email As String, ByVal messaggio As String) As String
        Dim smtp As New SmtpClient("smtp.lpbevande.com")
        Dim mail As New MailMessage
        Dim inviato As String
        Dim accesso As New System.Net.NetworkCredential("ordini@xxxxxxx.com", "yyyyyyy")
        smtp.UseDefaultCredentials = False
        smtp.Credentials = accesso
        smtp.DeliveryMethod = SmtpDeliveryMethod.Network
        mail.Subject = oggetto
        mail.From = New MailAddress("ordini@xxxxxxx.com")
        '  mail.To.Add("ordini@xxxxxxx.com")
        mail.To.Add("ordini@xxxxxxx.com")
        mail.To.Add(email)
        mail.Body = nome & vbCrLf & vbCrLf & messaggio
        Try
            smtp.SendAsync(mail, New Object)
            inviato = "True"
        Catch ex As Exception
            inviato = "False"
        End Try
        Return inviato
    End Function