SendEmail

        Dim mail_send As New System.Net.Mail.MailMessage()
        mail_send.From = New System.Net.Mail.MailAddress(correo_serv)
        mail_send.Subject = "Recupera tu cuenta OPDAPAS"
        mail_send.To.Add(email)
        mail_send.IsBodyHtml =true
        mail_send.Body = body_mail

        Dim Servidor As New System.Net.Mail.SmtpClient
        Servidor.Host = serv_smtp
        Servidor.Port = puerto_serv
        Servidor.EnableSsl = False
        Servidor.Credentials = New System.Net.NetworkCredential(correo_serv, pass_serv)
        Servidor.Send(mail_send)