![]()
(scusate)
Ecco quello che c'è nella riga 74:
.Send
![]()
(scusate)
Ecco quello che c'è nella riga 74:
.Send
e questo è lo script completo:
<%
DIM corpoMessaggio, numeroCampi, invioA, invioDa, nomeDominio, indirizzoIp, modulo, browserSistemaOperativo
'
'------------inizio modifiche necessarie------------------
'
'#### inserire il proprio indirizzo email
invioA = "tuo@indirizzo.it"
'
'#### inserire l'indirizzo email del mittente:
'#### dato che cdosys supporta questa notifica in caso di
'#### errore riceverete a questo indirizzo un MAILER-DAEMON
'
invioDa = "tuo@indirizzo.it"
'------------fine modifiche necessarie--------------------
'
'------------eventuali modifiche facoltative:-------------
'#### ricercare il contento dell'oggetto del messaggio, è nelle riga dopo '####
'#### ricercare l'inizio del corpo del messaggio, è nella riga dopo '####
'#### ricercare nella penultima riga il file di risposta e modificaro
'#### con il persorso,il nome e l'estensione che desiderate utilizzare
'#### nel nostro esempio: grazie.asp
'
'
nomeDominio = Request.ServerVariables("HTTP_HOST")
indirizzoIp = Request.ServerVariables("REMOTE_ADDR")
modulo = Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo = Request.ServerVariables("HTTP_USER_AGENT")
'rileva i campi del form
FOR numeroCampi = 1 TO (Request.Form.Count() - 1)
IF NOT Request.Form(numeroCampi) = "" THEN
corpoMessaggio = corpoMessaggio & vbCrLf & Request.Form.Key(numeroCampi) & " = " & Trim(Request.Form(numeroCampi))
END IF
NEXT
'crea gli oggetti cdosys sul server e li gestisce
DIM iMsg, Flds, iConf
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "localhost"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update
With iMsg
Set .Configuration = iConf
.To = invioA
.From = Request.Form("email")
.Sender = invioDa
'#### questo è l'oggetto che comparirà nel messaggio
.Subject = "Contatto dal dominio " & nomeDominio
'#### questo è l'inizio del corpo messaggio (come stringa)
'#### attualmente attivato
.TextBody = "Questi i dati inseriti nel modulo presente alla pagina " & modulo & " da utente con indirizzo IP " & indirizzoIp & " browser e sistema operativo " & browserSistemaOperativo & vbCrLf & corpoMessaggio & ""
'#### questo è l'inizio del corpo messaggio (formattato in html)
'#### attualmente disattivato perche attivo come stringa
' .HTMLBody = "<font face=verdana size=2>Questi i dati inseriti nel modulo presente alla pagina " & modulo & " da utente con indirizzo IP " & indirizzoIp & " browser e sistema operativo " & browserSistemaOperativo & "
" & corpoMessaggio
.Send
End With
%>
<script>
document.location.replace('grazie.asp');
</script>
codice:Flds(cdoSMTPServer) = "smtp.tuoprovider.com"
ho provato a cambiare il dato e ora il messaggio di errore è questo:
CDO.Message.1 error '80040213'
Il trasporto non è riuscito a connettersi al server.
/sendcdosys.asp, line 74
E cosa hai messo esattamente?Originariamente inviato da studio 77
ho provato a cambiare il dato e ora il messaggio di errore è questo:
CDO.Message.1 error '80040213'
Il trasporto non è riuscito a connettersi al server.
/sendcdosys.asp, line 74
nella riga 49, dove c'è l'istruzione:
Flds(cdoSMTPServer) = "localhost"
ho sostituito con l'istruzione:
Flds(cdoSMTPServer) = "smtp.tuoprovider.com"
(ovviamente ho inserito il dominio e l'estensione giusta)
Sarebbe smtp.nomeTuoSito.it ?
La pagina la esegui dal tuo localhost per caso?
> Sarebbe smtp.nomeTuoSito.it ?
si, ho provato sia a mettere "smtp.nomedominio.it" sia "smtp.nomeprovider.com", ma non cambia nulla
> La pagina la esegui dal tuo localhost per caso?
No, la metto on line e la provo comunque on line
ne ho provato un altro di form e adesso mi da questo errore:
Persits.MailSender.4 error '800a0006'
550 <info@miodominio.com>, Recipient unknown
/mailer1.asp, line 123
Alla linea 123 c'è:
STATOMAIL=MyMail.Send
Dipende dalla email o dal dominio o da qualcosa del genere per caso?
Se il tuo dominio si chiama pippo.it devi usare una email mittente configurata per quel dominio ad esempio info@pippo.it
Roby
www.creamweb.it [v. 3.0]
:: Script ASP!
:: Web directory gratuita!
:: Campioni del mondo!