a me da questo errore perchè uso il vecchio metodo fatto da un mio amico ma credo copiato dai vostri script...
si può modificare con due click al nuovo sistema senza modificare le pagine??
Microsoft JScript runtime error '800a01ad'
Automation server can't create object
/shop/inoltraordine.asp, line 107
vi sposto la mia pagina è possibile modificarla senza ricreare tutto visto che me l'ha fatta un amico e non ci capisco un tubo ?
<%
Response.Expires = 0;
// Funzioni di utilità nel recupero e nella validazione del modulo
function mostraErrore(messaggio) {
Response.Write('<html>\n');
Response.Write('<head>\n');
Response.Write(' <title>Preventivo della spesa</title>\n');
Response.Write('</head>\n');
Response.Write('<body bgcolor="#FFFFFF">\n');
Response.Write(' <div align="center">\n');
Response.Write('
</p>\n');
Response.Write('
' + messaggio + '</p>\n');
Response.Write(' </div>\n');
Response.Write('</body>\n');
Response.Write('</html>\n');
Response.End;
}
function recupera(nomeCampo,messaggioErrore) {
temp = String(Request.Form(nomeCampo));
if (temp=="" || temp=="undefined") mostraErrore(messaggioErrore);
return temp;
}
// Il modulo viene recuperato e validato attraverso
// le due funzioni appena predisposte.
// Tutti i dati vengono riposti e formattati in
// un'unica variabile.
dati = "Cognome: " + recupera("cognome","COGNOME NON VALIDO TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + "\n" +
"CF. PI.: " + recupera("cf","CODICE FISCALE O PARTITA IVA NON VALIDO TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + "\n" +
"Indirizzo: " + recupera("indirizzo","INDIRIZZO NON VALIDO TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + " " +
"Num. Civ.: " + recupera("n","NUMERO CIVICO NON VALIDO TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + "\n" +
"Cap: " + recupera("cap","CAP NON VALIDO TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + " " +
"Città: " + recupera("citta","CITTA' NON VALIDA TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + " (" +
"Provincia: " + recupera("provincia","PROVINCIA NON VALIDA TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + ")\n\n" +
"Telefono: " + recupera("telefono","TELEFONO NON VALIDO TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + "\n" +
"Spedizione: " + recupera("spedizione","SPEDIZIONE NON VALIDA TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + "\n" +
"E mail: " + recupera("mail","EMAIL NON VALIDO TORNA INDIETRO E COMPILA DI NUOVO IL MODULO") + "\n"
cognome = recupera("cognome");
cf = recupera("cf");
indirizzo = recupera("indirizzo");
n = recupera("n");
cap = recupera("cap");
citta = recupera("citta");
provincia = recupera("provincia");
telefono = recupera("telefono");
email = recupera("mail");
// Si passa al recupero degli articoli contenuti nel carrello
mioCarrello = recuperaArticoli();
if (mioCarrello.length==0) Response.Redirect("carrello.asp");
totale = 0;
ordine = "";
order="";
// Viene calcolato nuovamente il preventivo
openConnection(Server.MapPath("articoli.mdb"));
for (i=0;i<mioCarrello.length;i++) {
ris = conn.Execute("SELECT * FROM articoli WHERE codice = '" + mioCarrello[i].codice + "'");
parziale2 = mioCarrello[i].quantita * ris("euro");
totale += parziale2;
var euro = parziale2;
ordine += "GIOCO: " + ris("codice") + "\n";
ordine += "QUANTITA': " + mioCarrello[i].quantita + "\n";
ordine += "PREZZO EURO: " + ris("euro") + "\n";
ordine += "TOTALE EURO: " + parziale2 + "\n\n";
order += "GIOCO: " + ris("codice")+ "
" + "QUANTITA': " + mioCarrello[i].quantita +"
"+"PREZZO EURO: " + ris("euro")+"
" + "
";
ris.Close();
}
ordine += "TOTALE FATTURA EURO: " + euro;
// La connessione viene chiusa, il database ora non serve più
conn.Close();
// Il carrello viene svuotato
svuotaCarrello();
// Viene generato il corpo dell'e mail
d = new Date();
corpo = "";
corpo += "ORDINE INOLTRATO IN DATA: " + d.toString() + "\n\n";
corpo += "DATI DEL CLIENTE: \n\n";
corpo += dati;
corpo += "\n";
corpo += "DETTAGLIO DELL'ORDINE: \n\n";
corpo += ordine;
data = d.toString() + "\n\n";
risultato = euro
// Attraverso CDONTS la mail viene infine
// generata e spedita
objMail = new ActiveXObject("CDONTS.NewMail");
objMail.From = "luca.picuti@fastwebnet.it";
objMail.To = "luca.picuti@fastwebnet.it";
objMail.Subject = ":::CNN2000.IT::: ORDINE PRODOTTI";
objMail.Body = corpo;
objMail.Importance = 1;
objMail.Send();
%>
Rispondi quotando
