Codice asp per invio email tramite form vorrei dei consigli

legolas

Sei un grande !

Grazie :D:D

sicuramente ti chiederò altri consigli per il sito che sto realizzando.

Siamo sempre qui e se non ti rispondo io ci sono altre persone pronte a rispondere molto più competenti di me

Ciao

gelova

Sapevo che non sarebbe passato molto tempo.......:bho:

Ho pubblicato il sito per fare la prova.....con IE 6 tutto ok mentre provando ad inviare l'email (sempre tramite quel form) con firefox mi è apparsa questa scritta sopra tutta la pagina:

<% theSchema="http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig=server.CreateObject("CDO.Configuration") cdoConfig.Fields.Item(theSchema & "sendusing")=2 cdoConfig.Fields.Item(theSchema & "smtpserver")="mio.smtp.it" cdoConfig.Fields.Update set cdoMessage=Server.CreateObject("CDO.Message") cdoMessage.Configuration=cdoConfig cdoMessage.From=Request.Form("email") cdoMessage.To="[email protected]" cdoMessage.Subject=Request.Form("subject") cdomessage.HtmlBody="Nome:" & request.form("nome") & "
Cognome:" & Request.form("cognome") & "
Citta:" & request.form("citta") & "
Email:" & request.Form("email") & "
Commenti:" & request.Form("commenti") cdoMessage.Send Set cdoMessage=Nothing Set cdoConfig=Nothing %>

Cosa è successo ??????

xx

legolas

potresti scrivere l'url della pag?
Ciao

gelova

Si certo
www.helpdeskinformatica.it
p.s.
on line riempiendo il form dei contatti e inviando il tutto
non mi manda l'email , come mai ?
potresti dargli un'occhiata cos'è che non va ?
Perchè in locale con Dreamweaver configurando il server di prova (con IIS)
funzionava tutto ? :bho:
Se hai la possibilità provalo con entrambi i Browser (IE 6 - Firefox 1.5.0.6)
Grazie ancora !

legolas

ciao, ho dato un'occhiata, ma così è poco chiaro.
Potresti postare tutto il codice della pagina, almeno analizziamo tutto riga per riga?
Praticamente la pag incriminata è grazie.asp, giusto?

Ciao

gelova

Si credo che sia la pagina grazie.asp, cmq io ti posto sia quella dei contatti.asp che quella di grazie.asp

PAGINA CONTATTI.ASP

<html>

<head>
<meta http-equiv="Content-Language" content="it">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Info Hardware</title>
<link rel="stylesheet" href="slat1011.css">
<meta name="Microsoft Theme" content="slate 1011">
<script type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d)&&d.all) x=d.all; for (i=0;!x&&i<d.forms.length;i++) x=d.forms*;
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers*.document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_validateForm() { //v4.0
var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args*);
if (val) { nm=val.name; if ((val=val.value)!="") {
if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
} else if (test!='R') { num = parseFloat(val);
if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
min=test.substring(8,p); max=test.substring(p+1);
if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
} } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
} if (errors) alert('The following error(s) occurred:\n'+errors);
document.MM_returnValue = (errors == '');
}
//-->
</script>
<style type="text/css">

</style></head>

<body>

<table border="0" width="100%">
<tr>
<td width="104"> </td>
<td width="500">
<img border="0" src="Immagineperhome.jpg" width="471" height="205"></td>
<td><a href="index.htm"><span style="text-decoration: none">
<font color="#008000">Home</font></span></a><p><a href="hardware.htm">
<span style="text-decoration: none"><font color="#008000">Info Hardware</font></span></a></p>
<p><a href="software.htm"><span style="text-decoration: none">
<font color="#008000">Info Software</font></span></a><p>
<a href="notizie.htm"><span style="text-decoration: none">
<font color="#008000">Notizie</font></span></a></td>
</tr>
<tr>
<td width="104" height="57"> </td>
<td width="500" height="57">
<p align="center">
<img border="0" src="Contatti.gif" width="190" height="47"></td>
<td height="57"> </td>
</tr>
<tr>
<td width="104"> </td>
<td width="500"><p> </p>
<p> </p>
<form action="grazie.asp" method="post" name="frm_message" id="frm_message">
<p>Nome:
<input name="nome" type="text" id="nome">
Cognome:
<input name="cognome" type="text" id="cognome">
</p>
<p>Città:
<input name="citta" type="text" id="citta">
Email:
<input name="email" type="text" id="email">
</p>
<p> </p>
<p>Commenti:
<textarea name="commenti" id="commenti"></textarea>
</p>
<p>
<input name="Submit" type="submit" onClick="MM_validateForm('nome','','R','cognome','','R','citta','','R','email','','RisEmail');return document.MM_returnValue" value="Invia">
<input type="reset" name="Submit2" value="Cancella">
</p>
<p> </p>
<p> </p>
</form>
<p> </p>
<p>
<p>
<br>
</p>
<p> </p>
<p></td>
<td><font color="#008000">Nome Cognome</font><p>
<img border="0" src="Gif/phone2-c.gif" width="41" height="48"><font size="2" color="#008000">numero di cell</font>
</p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p><p><p><p></td>
</tr>
</table>

</body>

</html>

PAGINA GRAZIE.ASP

<html>

<head>
<meta http-equiv="Content-Language" content="it">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Info Hardware</title>
<link rel="stylesheet" href="slat1011.css">
<meta name="Microsoft Theme" content="slate 1011">
</head>

<body>
<%
theSchema="http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(theSchema & "sendusing")=2
cdoConfig.Fields.Item(theSchema & "smtpserver")="smtp.tele2.it"
cdoConfig.Fields.Update

set cdoMessage=Server.CreateObject("CDO.Message")
cdoMessage.Configuration=cdoConfig

cdoMessage.From=Request.Form("email")
cdoMessage.To="[email protected]"
cdomessage.HtmlBody="Nome:" & request.form("nome") & "<br/>Cognome:" & Request.form("cognome") & "<br/>Citta:" & request.form("citta") & "<br/>Email:" & request.Form("email") & "<br/>Commenti:" & request.Form("commenti")
cdoMessage.Send

Set cdoMessage=Nothing
Set cdoConfig=Nothing

%>

<table border="0" width="100%">
<tr>
<td width="104"> </td>
<td width="500">
<img border="0" src="Immagineperhome.jpg" width="471" height="205"></td>
<td><a href="index.htm"><font color="#008000">
<span style="text-decoration: none">Home</span></font></a><p><a href="hardware.htm">
<span style="text-decoration: none"><font color="#008000">Info Hardware</font></span></a></p>
<p><a href="software.htm"><span style="text-decoration: none">
<font color="#008000">Info Software</font></span></a><p>
<font color="#008000"><a href="notizie.htm">
<span style="text-decoration: none"><font color="#008000">Notizie</font></span></a></font></td>
</tr>
<tr>
<td width="104" height="57"> </td>
<td width="500" height="57">
<p align="center">
</td>
<td height="57"> </td>
</tr>
<tr>
<td width="104"> </td>
<td width="500">
<p> </p>
<p align="center"><font color="#008000">Ringraziandola per l'attenzione,
le risponderemo il più presto possibile.<br>
</font></p>
<p></td>
<td> </td>
</tr>
</table>

</body>

</html>

madai

Le pagine asp non vengono interpretate... il web server è Apache... il server lo gestisci tu? E' installato un modulo asp? In caso contrario le asp vengono trattate come normali html.

Ciao

gelova

Per fare le prove in locale (dove funziona tutto) ho solamente installato IIS, il server che ospita il sito avrà sicuramente tutte le applicazioni necessarie per far funzionare le pagine ASP !

madai

@gelova said:

Per fare le prove in locale (dove funziona tutto) ho solamente installato IIS, il server che ospita il sito avrà sicuramente tutte le applicazioni necessarie per far funzionare le pagine ASP !

Vedo che sei su Register.it. Quale piano hosting hai scelto? Hosting personal non supporta ASP.

gelova

Premetto che tutto il sito è stato relaizzato con FrontPage solo queste due pag. (grazie e contatti) le ho modificate con il dreamweaver e da html rinominate in asp, ma ripeto il locale l'email riusciva a spedirle !

gelova

Nooooooo allora è proprio quello il problema ?
l' Hosting personal....si ho scelto quello + economico, ma solo ora mi sto rendendo conto (grazie a voi) che non supporta l'ASP xx
ma che cavolo....ho pure provato
a pubblicarlo sul gratuito netsons che ha il supporto al PHP5, IPV6 ma non mensionava l'ASP ma credevo fosse scontato il supporto e non la invia neanche.
Eppure 35euro +iva per registrarsi su register non sono poi così poche rispetto un aruba (anche se non so se ha il supporto all' ASP) non posso pagare 85euro +iva l'anno per rimanere con register e passare all' Hosting superiore, sono troppe.
Cosa mi consigliate voi ?

madai

@gelova said:

Nooooooo allora è proprio quello il problema ?
l' Hosting personal....si ho scelto quello + economico, ma solo ora mi sto rendendo conto (grazie a voi) che non supporta l'ASP xx
ma che cavolo....ho pure provato
a pubblicarlo sul gratuito netsons che ha il supporto al PHP5, IPV6 ma non mensionava l'ASP ma credevo fosse scontato il supporto e non la invia neanche.
Eppure 35euro +iva per registrarsi su register non sono poi così poche rispetto un aruba (anche se non so se ha il supporto all' ASP) non posso pagare 85euro +iva l'anno per rimanere con register e passare all' Hosting superiore, sono troppe.
Cosa mi consigliate voi ?

Aruba supporta asp.

A questo punto visto che ti serve asp solo per inviare una email ti consiglio di farlo in php.

gelova

Come !!!!! ARUBA supporta l'ASP !!!!!
Qualsiasi livello (da quello base a quello più alto) ?
Costa quasi la metà registrarsi sui loro server !

E l'hosting personal su cui mi sono registrato supporta il PHP ?

Come di ASP anche di PHP non ne capisco una mazza
saresti così gentile da postarmi il codice da inserire ?
:bho:

madai

@gelova said:

E l'hosting personal supporta il PHP ?
E quale sarebbe il codice da inserire ?
:bho:
ho dato un'occhiata alle caratteristiche dell'hosting in oggetto ma non è specificato il supporto php... non ti rimane che fare una prova, è un web server Apache dovrebbe supportarlo... fai così:

Crea un file di testo, incollaci la seguente stringa:
[php] <?
echo "Supporto php attivo";
?>[/php]
Rinominalo prova.php e mettilo online. Ora richiamalo dal tuo browser e facci sapere.

Ciao

gelova

Niente da fare ho provato, mi appare una pagina bianca x:x

Siamo sicuri che Aruba supporti l' ASP, PHP ecc...anche se scegliessi l'offerta base ?

Quasi..quasi mi creo un'altro dominio, dato che con Register sono limitato alle pagine statiche !

madai

Aruba supporta quasi tutto http://hosting.aruba.it/hosting_con_spazio.asp?offerta=1

Occhio che se ho letto bene il tuo hosting su register dovrebbe avere un "form mail":

Web Site Builder
Free Blog
Wizard per gallerie di immagini
Wizard per ritocco immagini
Wizard per intro in Flash
Form di invio email
Guestbook dinamico
Tell-a-friend dinamico
Ottimizzatore pagine per i motori di ricerca
Indicizzazione del sito su 100 motori di ricerca
Informati bene di cosa si tratta magari fa proprio a caso tuo.

Ciao

gelova

Ok Grazie 1000 !!!!

gelova

Madai e Legolas mi sa tanto che ho ancora bisogno di voi !!!!!
Avendo pubblicato su aruba un'altro sito ho altri problemi con questo m....
di form .
Il messaggio di errore è il seguente:

CDO.Message.1 error '8004020d'
At least one of the From or Sender fields is required, and neither was found.
/grazie2.asp, line 25

Avendo contattato l'assistenza di aruba mi dicono che non sussitono problemi sul server e mi hanno consigliato l'uso del comando "**CDOSYS" **e mi hanno inviato a consultare la seguente pag.
http://vademecum.aruba.it/start/contatto/contatto.htm
ho provato a utilizzare i file da loro consigliati (formcdosys.asp-grazie.asp-contatto.html) ed effettivamente funziona ma perchè devo utilizzare questo che tra l'altro è costituito da 3 pag. e non il mio che sono solo 2 , e dopo il comando CDOSYS non lo conosco come faccio se volessi modificare le singole voci non saprei da dove cominciare e poi perchè il form precedente modificato con il vostro aiuto non funziona ?
Grazie !!!

madai

@gelova said:

Madai e Legolas mi sa tanto che ho ancora bisogno di voi !!!!!
Avendo pubblicato su aruba un'altro sito ho altri problemi con questo m....
di form .
Il messaggio di errore è il seguente:

CDO.Message.1 error '8004020d'
At least one of the From or Sender fields is required, and neither was found.
/grazie2.asp, line 25

Avendo contattato l'assistenza di aruba mi dicono che non sussitono problemi sul server e mi hanno consigliato l'uso del comando "**CDOSYS" **e mi hanno inviato a consultare la seguente pag.
http://vademecum.aruba.it/start/contatto/contatto.htm
ho provato a utilizzare i file da loro consigliati (formcdosys.asp-grazie.asp-contatto.html) ed effettivamente funziona ma perchè devo utilizzare questo che tra l'altro è costituito da 3 pag. e non il mio che sono solo 2 , e dopo il comando CDOSYS non lo conosco come faccio se volessi modificare le singole voci non saprei da dove cominciare e poi perchè il form precedente modificato con il vostro aiuto non funziona ?
Grazie !!!

Il codice di Legolas usa già cdosys.

L'errore ti dice che mancano i campi relativi all'email di chi invia ed all'email del destinatario... controlla che non siano vuoti.

gelova

I campi sono pieni, non capisco......:bho:
Ho nuovamente utilizzato il più semplice e cioè:

<%
theSchema="http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(theSchema & "sendusing")=2
cdoConfig.Fields.Item(theSchema & "smtpserver")="mio.smtp.it"
cdoConfig.Fields.Update

set cdoMessage=Server.CreateObject("CDO.Message")
cdoMessage.Configuration=cdoConfig

cdoMessage.From=Request.Form("emailAddress")
cdoMessage.To="[email protected]"
cdoMessage.Subject=Request.Form("subject")
cdomessage.TextBody=Request.Form("body")
cdoMessage.Send

Set cdoMessage=Nothing
Set cdoConfig=Nothing

%>

Inserendo solamente email,oggetto e corpo del messaggio

questo nella pag. grazie.asp

nella pag. contatti.asp ho inserito il seguente form:

<form id="form1" name="form1" method="post" action="grazie.asp">
<p> Tua email:
<input name="emailAddress" type="text" id="emailAddress" />
Soggetto:
<input name="subject" type="text" id="subject" />
</p>
<p>:

</p>

<p> </p>
<p>Message Body :
<textarea name="body" id="body"></textarea>
</p>
<p>
<input type="submit" name="Submit" value="Invia" />
<input type="reset" name="Submit2" value="Cancella" />
</p>
<p> </p>
</form>

ma continua a darmi un errore, con Firefox mi appare questo:

error '8004020f' /grazie.asp, line 17

con IE 6 la classica "Impossibile visualizzare la pagina"......la cosa strana è che se provo con IE ad accedere alla pagina incriminata e cioè grazie.asp mi appare impossibile visualizzare.........
:bho::bho::bho::bho::bho::bho: