Dim _cDoMails As New cDoMails(e.cDoConnect)
Dim _cDoMail As cDoMail = _cDoMails.NewMail
_cDoMail.From="CED@Riccicasa.it"
_cDoMail.To="CED@Miosito.it"
_cDoMail.Subject = "Oggetto della mail"
_cDoMail.Body = "Body riga 1" & vbcrlf & "Body riga 2"
_cDoMails.Send()