Form mail con register.it

cito17

Nuovo Utente
4 Mag 2006
11
0
0
www.proseges.it
Ho inserito un form per l'invio di mail dal sito ma haimè non invia un bel niente.
Premetto che lo suo anche su aruba e funziona benissimo quale sarà il problema.
L'e-mail funziona che sia l'smtp?? il fatto è che non mi restituisce nessun errore mi dice mail inviata ma quando vado ad aprire l'account non è arrivato niente.

Allego codice.

Codice:
DIM corpoMessaggio, numeroCampi, invioA, invioDa, nomeDominio, indirizzoIp, modulo, browserSistemaOperativo

	'* voce da modificare con il proprio indirizzo email
	
invioA =  "[email protected]"

	'* voce da modificare con un indirizzo email che funga da mittente: 
	'* in caso di errore riceverete notifica a questo indirizzo un MAILER-DAEMON
	'* dato che cdosys supporta questa notifica
		
invioDa =  "[email protected]"

nomeDominio 				= Request.ServerVariables("HTTP_HOST")
indirizzoIp					= Request.ServerVariables("REMOTE_ADDR") 
modulo						= Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo		= Request.ServerVariables("HTTP_USER_AGENT")

	'*rilevo 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

	'* creo gli oggetti cdosys sul server e li gestisco
	
DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "mail.dada.it" 
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

With iMsg
   Set .Configuration = iConf
   .To = invioA
   .From = Request.Form("email")
   .Sender = invioDa
   .Subject = "Contatto dal dominio " & nomeDominio
   .TextBody = "Questi i dati inseriti nel modulo presente alla pagina " & modulo & " da utente con indirizzo IP " & indirizzoIp & "  browser e sistema operativo " & browserSistemaOperativo  & vbCrLf & corpoMessaggio & ""
   .Send
End With
%> 
<script>
document.location.replace('grazie.asp');
</script>
 

Vale_Barbato

Utente Attivo
15 Set 2005
465
0
0
cito17 ha scritto:
Ho inserito un form per l'invio di mail dal sito ma haimè non invia un bel niente.
Premetto che lo suo anche su aruba e funziona benissimo quale sarà il problema.
L'e-mail funziona che sia l'smtp?? il fatto è che non mi restituisce nessun errore mi dice mail inviata ma quando vado ad aprire l'account non è arrivato niente.

Allego codice.

Codice:
DIM corpoMessaggio, numeroCampi, invioA, invioDa, nomeDominio, indirizzoIp, modulo, browserSistemaOperativo

	'* voce da modificare con il proprio indirizzo email
	
invioA =  "[email protected]"

	'* voce da modificare con un indirizzo email che funga da mittente: 
	'* in caso di errore riceverete notifica a questo indirizzo un MAILER-DAEMON
	'* dato che cdosys supporta questa notifica
		
invioDa =  "[email protected]"

nomeDominio 				= Request.ServerVariables("HTTP_HOST")
indirizzoIp					= Request.ServerVariables("REMOTE_ADDR") 
modulo						= Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo		= Request.ServerVariables("HTTP_USER_AGENT")

	'*rilevo 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

	'* creo gli oggetti cdosys sul server e li gestisco
	
DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "mail.dada.it" 
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

With iMsg
   Set .Configuration = iConf
   .To = invioA
   .From = Request.Form("email")
   .Sender = invioDa
   .Subject = "Contatto dal dominio " & nomeDominio
   .TextBody = "Questi i dati inseriti nel modulo presente alla pagina " & modulo & " da utente con indirizzo IP " & indirizzoIp & "  browser e sistema operativo " & browserSistemaOperativo  & vbCrLf & corpoMessaggio & ""
   .Send
End With
%> 
<script>
document.location.replace('grazie.asp');
</script>


Prova ad utilizzare al posto di cdosys il cdonts ;)
 

cito17

Nuovo Utente
4 Mag 2006
11
0
0
www.proseges.it
Anch'io non ho capito cosa manca, forse l'autentificazione??

Cmq rimango nel dubbio in quanto lo stesso script su aruba funziona
 

lukeonweb

Utente Attivo
5 Mar 2003
5.175
13
38
46
Napoli
www.lucaruggiero.it
come che ho detto? sta usando cdosys, tutto qui :)

ho aggiunto anche che la seconda parte del codice, quella che richiama cdo.configuration, manca di alcuni parametri, tra cui username e password, ovvero quelle da cui manda email attraverso il server di register.it

io uso le mie mail, ad esempio [email protected] con relativa password, ed inoltre indico il server di posta di aspcodehost.com dove sono in hosting

lui indica mail.dada.it e nemmeno mi convince... mica hai preso un esempio dallarete e lo hai adattato?

credo che sia qualcosa "tipo" mail.register.it

controlla
 

cito17

Nuovo Utente
4 Mag 2006
11
0
0
www.proseges.it
mail.dada.it lo ho preso dalle impostazioni per smtp di register.it

avevo già provato con smtp.register.it e con smtp.miodominio.it ma niente, adesso provo a mettere utente e psw e ti faccio sapere
 

cito17

Nuovo Utente
4 Mag 2006
11
0
0
www.proseges.it
le ho provate ma niente.

Questo è il codice come lo ho ritoccato secondo i tuoi suggerimenti:

Codice:
<%
DIM corpoMessaggio, numeroCampi, invioA, invioDa, nomeDominio, indirizzoIp, modulo, browserSistemaOperativo

	'* voce da modificare con il proprio indirizzo email
	
invioA =  "[email protected]"
invioDa =  "[email protected]"

nomeDominio 				= Request.ServerVariables("HTTP_HOST")
indirizzoIp					= Request.ServerVariables("REMOTE_ADDR") 
modulo						= Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo		= Request.ServerVariables("HTTP_USER_AGENT")

	'*rilevo 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

	'* creo gli oggetti cdosys sul server e li gestisco
	
DIM path, iMsg, iConf, config

path = "http://schemas.microsoft.com/cdo/configuration/"

Set config  = Server.CreateObject("CDO.Configuration")
Set iMsg = CreateObject("CDO.Message")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
config.Fields(path & "smtpauthenticate") = "smtp.register.it" 
config.Fields(path & "smtpserverport") = 25
Flds(cdoSMTPAuthenticate) = cdoBasic
config.Fields(path & "sendusername") = "[email protected]"
config.Fields(path & "sendpassword") = "******"
Flds.Update

With iMsg
   Set .Configuration = iConf
   .To = invioA
   .From = Request.Form("email")
   .Sender = invioDa
   .Subject = "Contatto dal dominio " & nomeDominio
   .TextBody = "Questi i dati inseriti nel modulo presente alla pagina " & modulo & " da utente con indirizzo IP " & indirizzoIp & "  browser e sistema operativo " & browserSistemaOperativo  & vbCrLf & corpoMessaggio & ""
   .Send
End With
%> 
<script>
document.location.replace('grazie.asp');
</script>

se vedi qualcosa che ancora non và
 

lukeonweb

Utente Attivo
5 Mar 2003
5.175
13
38
46
Napoli
www.lucaruggiero.it
naturalmente immagino che

config.Fields(path & "sendusername") = "[email protected]"
config.Fields(path & "sendpassword") = "******"

siano dati di prova da scrivere qui, giusto?

perchè non provi a scrivere a register.it per chiedere una dritta? magari hanno solo il servr di posta intasato e ci stai perdendo la testa per nulla...
 

cito17

Nuovo Utente
4 Mag 2006
11
0
0
www.proseges.it
Ecco la soluzione del problema

Notizia:

Ho provato a fare una ricerca con google per venircene fuori e alla 5° pagina ho trovato un thread di un forum che non ricordo dove mi rimandava ad una risposta di una FAQ ,nascosta bene, di register.it dove spiega come inserire un form mail in cdonts (tra l'altro anche molto bene).
Quindi prendo il codice lo inserisco nella pagina, compilo il modulo clicco su submit e.......
MI SI APRE UN ERRORE DI DOWNLOAD!?!?!?!?!?
Sicuramente ho sbagliato qualche cosa, quindi armato di pazienza ritorno sulla FAQ mi leggo bene il tutto e cosa trovo???

Stralcio della FAQ:

...omissis...​
Le soluzioni BasicHost, PHPHost, MySQLHost di Register.it comprendono un FormMail di contatto 'base' facile da inserire sulle tue pagine (NB: il formmail non può essere inserito se hai solo i 10 GB di FreeHost inclusi nel dominio o un pacchetto di spazio aggiuntivo sul FreeHost)
...omissis...​

Quindi ne deduco che anche cdontsys venga in qualche modo bloccato per lo stesso motivo
Della serie paghi poco (E poi non così poco) e poco avrai (Se non niente)

Non mi resta che dire che sono senza parole :crying: Cmq grazie a tutti per l'aiuto.
 
Discussioni simili
Autore Titolo Forum Risposte Data
I [PHP] inviare form con allegato tramite una mail PHP 1
P invio mail da form con dati php PHP 7
S Form invio mail html, con invio tramite file denominato invio.php PHP 8
F Problemi con ricezione mail dal form PHP 8
M non ci do fuori con il form mail PHP 1
M Form mail con dreamweaver cs6 PHP 2
L Sviluppare form mail con allegato PHP 6
L Form con invio mail PHP 1
M Adattare script di "form mail con upload file" al mio form mail HTML! PHP 7
M form mail con allegato e immagine Classic ASP 4
E Form invio e-mail con allegato PHP 51
E Form invio e-mail con allegato PHP 0
E form mail con mysql PHP 18
N Form invio Mail con Allegato PHP 2
C problema invio mail con form php PHP 0
F Mail con un form post PHP 3
B Creazione form con oscuramento mail mittente e destinatario PHP 2
C AJAX FORM MAIL - problema con gli a capo nel messaggio Javascript 0
G Form mail con indirizzo email del mittente PHP 3
S form invio mail con foto o logo PHP 46
E aiuto form allegato.con funzione mail PHP 8
D Problema con allegato tramite form mail PHP 2
rollobix Form Mail con file allegato Presenta il tuo Sito 8
S realizzare form mail con dreamweaver Webdesign e Grafica 16
D Mail in html con una form all'interno? HTML e CSS 2
M Aiuto con la Form Mail PHP 34
S form invio mail con opzioni PHP 3
P Form mail con securimage PHP 0
R Form Mail: Problema con Frame Supporto Mr.Webmaster 4
T Invio mail da form contatti con annesso file attachment Classic ASP 1
L Problemi con invio form via mail Classic ASP 3
F script asp invio mail con dati di un form Classic ASP 3
M problema con form mail Flash 2
P Form to mail con allegata un'immagine PHP 1
U Aiuto con form mail Classic ASP 3
S Form mail con ASP Classic ASP 1
F form mail con inoltro Classic ASP 3
U PHP bottone per invio mail o ritorno al form PHP 15
B [PHP] Invio mail automatico dopo compilazione form - db PHP 25
Cosina Andare a capo nel testo della mail ricevuta dal form php PHP 1
paloppa [PHP] Invio mail da form dubbio PHP 17
F Form mail php errore invio PHP 5
allegria [PHP] Ricevo una doppia mail dal form PHP 6
ecosito [PHP] Attivare il form mail di un template PHP 2
Samuele Ronzani Form mail HTML HTML e CSS 7
utente Form mail php - indirizzo ip PHP 9
I form invio mail HTML e CSS 1
Francesco Polese Errore form invio mail+php PHP 22
F Form mail HTML e CSS 14
W Estrapolare un indirizzo mail di un form durante l'invio PHP 5

Discussioni simili