invio modulo

[EmilioPaolo]

Ciao a tutti
ho integrato un form per la richiesta di informazioni in una pagina *.asp del mio sito in corso di pubblicazione su aruba.

il codice, adibito all'elaborazione e invio delle info, consigliato dall'autore è il seguente:

<%@LANGUAGE = JScript%>
<%
   /*
        Autore: Luca Ruggiero - http://www.lukeonweb.net
        
   */

   var destinatario = "info@cultin.it"; // Inserisci qui il tuo indirizzo email

   // Recupero i dati dal modulo
   var nome = new String(Request.Form("nome"));
   var cognome = new String(Request.Form("cognome"));
   var email = new String(Request.Form("email"));
   var oggetto = new String(Request.Form("oggetto"));
   var importanza = new String(Request.Form("importanza"));
   var messaggio = new String(Request.Form("messaggio"));
   var html = new String(Request.Form("html"));

   // RegExp per l'email
   var valida = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-]{2,})+\.)+([a-zA-Z0-9]{2,})+$/;

   // Imposto la data
   var oggi = new Date();
   var data = oggi.getDate() + "/" + (oggi.getMonth() + 1) + "/" + oggi.getYear() + " alle ore " + oggi.getHours() + ":" + oggi.getMinutes();

   // Imposto l'indirizzo IP del mittente
   var ip = Request.ServerVariables("REMOTE_ADDR");

   // Controllo la validità dei campi
   if ((nome == "") || (nome == "undefined")) Response.Redirect("errore.htm?id=1");
   if ((cognome == "") || (cognome == "undefined")) Response.Redirect("errore.htm?id=2");
   if (!valida.test(email)) Response.Redirect("errore.htm?id=3");
   if ((oggetto == "") || (oggetto == "undefined")) Response.Redirect("errore.htm?id=4");
   if ((messaggio == "") || (messaggio == "undefined")) Response.Redirect("errore.htm?id=5");

   // 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 = "Dati del mittente

Nome: " + nome + "
Cognome: " + cognome + "
Email: " + email + "
IP: " + ip + "

Messaggio spedito il " + data + "

Questo è il corpo del messaggio:

" + messaggio;
       }
       OggettoCDONTS.Send();

   // Reindirizzo il mittente verso la pagina di conferma
   Response.Redirect("conferma.htm");
%>

alla prova dei fatti però la risposta del server è la seguente:

Microsoft JScript runtime  error '800a01ad'

Automation server can't create object

/email.asp, line 37

è possibile che aruba non permetta l'utilizzo di questo codice? o c'è un errore che non vedo?

[weppos]

Non è installato l'oggetto CDONTS.
Verifica su quale server stai e quale oggetto puoi usare, quasi sicuramente CDOSYS.

Dopo di che , sono state postate già numerose soluzioni.