da CDONTS a CDO

[Jacqui]

Ciao a tutti,
il mio sistema utilizza CDO non CDONTS.... mi aiutate a modificare questo script di invio mail?
grazie

   // Creo la classe CDONTS.NewMail ed invio l'email
   var OggettoCDONTS = new ActiveXObject("CDONTS.NewMail");
       OggettoCDONTS.Importance = importanza;
       OggettoCDONTS.From = email;
       OggettoCDONTS.To = destinatario;
       OggettoCDONTS.Subject = oggetto;
       // Verifica se la mail è in formato Html
       if ((html == "") || (html == "undefined")) {
         OggettoCDONTS.BodyFormat = 1;
         OggettoCDONTS.MailFormat = 1;
         OggettoCDONTS.Body = "Dati del mittente\n\nNome: " + nome + "\nCognome: " + cognome + "\nEmail: " + email + "\nIP: " + ip + "\n\nMessaggio spedito il " + data + "\n\nQuesto è il corpo del messaggio:\n\n" + messaggio;
       }
       else {
         OggettoCDONTS.BodyFormat = 0;
         OggettoCDONTS.MailFormat = 0;
         OggettoCDONTS.Body = "[b]Dati del mittente

Nome:[/b] " + nome + "
[b]Cognome:[/b] " + cognome + "
[b]Email:[/b] " + email + "
[b]IP[/b]: " + ip + "

[i]Messaggio spedito il " + data + "[/i]

[b]Questo è il corpo del messaggio:[/b]

" + messaggio;
       }
       OggettoCDONTS.Send();