Visualizzazione dei risultati da 1 a 5 su 5

Discussione: Errore co Luke_email

  1. #1

    Errore co Luke_email

    il codice è quello originale, ma da un errore...

    codice:
    Microsoft JScript runtime error '800a01ad' 
    
    Automation server can't create object 
    
    /email.asp, line 37
    il codice è questo
    codice:
    <%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
    <%
       /*
            Autore: Luca Ruggiero - http://www.lukeonweb.net
            Fonte:  freeAsp.it - http://freeasp.html.it
       */
    
       var destinatario = "giuseppe.critelli@impericaweb.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");
    %>
    come risolvo?... grazie a tutti...
    La Gratitudine è la prima cosa nella vita...

    Grazie a tutti

  2. #2
    immagino l'errore sia a questa riga
    codice:
    var OggettoCDONTS = new ActiveXObject("CDONTS.NewMail");
    evidentemente il tuo server non usa cdonts per inviare email: scopri che componente usa e cambia di conseguenza l'oggetto da creare

  3. #3
    con smtp è possibile?

    oppure con CDONSYS....


    chi mi aiuta?
    La Gratitudine è la prima cosa nella vita...

    Grazie a tutti

  4. #4

  5. #5
    ora sto provando così:

    codice:
    <%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
    <%
       /*
            Autore: Luca Ruggiero - http://www.lukeonweb.net
            Fonte:  freeAsp.it - http://freeasp.html.it
       */
    
       var destinatario = "destinatario@posta.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 CDOSYS.NewMail ed invio l'email
       var OggettoCDOSYS = new ActiveXObject("CDOSYS.NewMail");
           OggettoCDOSYS.Importance = importanza;
           OggettoCDOSYS.From = email;
           OggettoCDOSYS.To = destinatario;
           OggettoCDOSYS.Subject = oggetto;
           // Verifica se la mail è in formato Html
           if ((html == "") || (html == "undefined")) {
               OggettoCDOSYS.BodyFormat = 1;
               OggettoCDOSYS.MailFormat = 1;
               OggettoCDOSYS.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 {
               OggettoCDOSYS.BodyFormat = 0;
               OggettoCDOSYS.MailFormat = 0;
               OggettoCDOSYS.Body = "Dati del mittente
    
    Nome: " + nome + "
    Cognome: " + cognome + "
    Email: " + email + "
    IP: " + ip + "
    
    Messaggio spedito il " + data + "
    
    Questo è il corpo del messaggio:
    
    " + messaggio;
           }
           OggettoCDOSYS.Send();
    
       // Reindirizzo il mittente verso la pagina di conferma
       Response.Redirect("conferma.htm");
    %>
    ma da sempre lo stesso errore...

    aiutooo...grazie a tutti
    La Gratitudine è la prima cosa nella vita...

    Grazie a tutti

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.