Form mail con register.it

Discussione in 'Classic ASP' iniziata da cito17, 5 Maggio 2006.

  1. cito17

    cito17 Nuovo Utente

    Registrato:
    4 Maggio 2006
    Messaggi:
    11
    Mi Piace Ricevuti:
    0
    Punteggio:
    0
    Home Page:
    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 =  "info@miosito.com"
    
    	'* 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 =  "info@miosito.com"
    
    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>
    
     
  2. Vale_Barbato

    Vale_Barbato Utente Attivo

    Registrato:
    15 Settembre 2005
    Messaggi:
    465
    Mi Piace Ricevuti:
    0
    Punteggio:
    0

    Prova ad utilizzare al posto di cdosys il cdonts ;)
     
  3. lukeonweb

    lukeonweb Utente Attivo

    Registrato:
    5 Marzo 2003
    Messaggi:
    5.189
    Mi Piace Ricevuti:
    9
    Punteggio:
    38
    Occupazione:
    Webmaster
    Località:
    Napoli
    Home Page:
  4. Vale_Barbato

    Vale_Barbato Utente Attivo

    Registrato:
    15 Settembre 2005
    Messaggi:
    465
    Mi Piace Ricevuti:
    0
    Punteggio:
    0

    Non ho capito che mi hai detto, ma sembra che manchi la parte iniziale o sbaglio!
     
  5. cito17

    cito17 Nuovo Utente

    Registrato:
    4 Maggio 2006
    Messaggi:
    11
    Mi Piace Ricevuti:
    0
    Punteggio:
    0
    Home Page:
    Anch'io non ho capito cosa manca, forse l'autentificazione??

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

    lukeonweb Utente Attivo

    Registrato:
    5 Marzo 2003
    Messaggi:
    5.189
    Mi Piace Ricevuti:
    9
    Punteggio:
    38
    Occupazione:
    Webmaster
    Località:
    Napoli
    Home Page:
    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 .....@aspcenter.net 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
     
  7. cito17

    cito17 Nuovo Utente

    Registrato:
    4 Maggio 2006
    Messaggi:
    11
    Mi Piace Ricevuti:
    0
    Punteggio:
    0
    Home Page:
    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
     
  8. cito17

    cito17 Nuovo Utente

    Registrato:
    4 Maggio 2006
    Messaggi:
    11
    Mi Piace Ricevuti:
    0
    Punteggio:
    0
    Home Page:
    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 =  "info@miodominio.com"
    invioDa =  "info@miodominio.com"
    
    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") = "info@miodominio.com"
    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à
     
  9. Vale_Barbato

    Vale_Barbato Utente Attivo

    Registrato:
    15 Settembre 2005
    Messaggi:
    465
    Mi Piace Ricevuti:
    0
    Punteggio:
    0

    Invece di "smtp.register.it" prova "mail.register.it" o ancora webmail
     
  10. cito17

    cito17 Nuovo Utente

    Registrato:
    4 Maggio 2006
    Messaggi:
    11
    Mi Piace Ricevuti:
    0
    Punteggio:
    0
    Home Page:
    Nulla da fare non riesco a venircene fuori e vi assicuro che su aruba così come è scritto in originale funziona benissimo.
     
  11. lukeonweb

    lukeonweb Utente Attivo

    Registrato:
    5 Marzo 2003
    Messaggi:
    5.189
    Mi Piace Ricevuti:
    9
    Punteggio:
    38
    Occupazione:
    Webmaster
    Località:
    Napoli
    Home Page:
    naturalmente immagino che

    config.Fields(path & "sendusername") = "info@miodominio.com"
    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...
     
  12. cito17

    cito17 Nuovo Utente

    Registrato:
    4 Maggio 2006
    Messaggi:
    11
    Mi Piace Ricevuti:
    0
    Punteggio:
    0
    Home Page:
    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.
     
  13. Vale_Barbato

    Vale_Barbato Utente Attivo

    Registrato:
    15 Settembre 2005
    Messaggi:
    465
    Mi Piace Ricevuti:
    0
    Punteggio:
    0
    I grandi che fanno figure da piccoli...

    Buona fortuna Cito17 ;)
     
Sto caricando...

Condividi questa Pagina