Pagina 2 di 4 primaprima 1 2 3 4 ultimoultimo
Visualizzazione dei risultati da 11 a 20 su 34

Discussione: Form che non funziona

  1. #11


    (scusate)

    Ecco quello che c'è nella riga 74:

    .Send

  2. #12
    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>

  3. #13
    codice:
    Flds(cdoSMTPServer) = "smtp.tuoprovider.com"

  4. #14
    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

  5. #15
    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
    E cosa hai messo esattamente?

  6. #16
    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)

  7. #17
    Sarebbe smtp.nomeTuoSito.it ?
    La pagina la esegui dal tuo localhost per caso?

  8. #18
    > 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

  9. #19
    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?

  10. #20
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Se il tuo dominio si chiama pippo.it devi usare una email mittente configurata per quel dominio ad esempio info@pippo.it

    Roby

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.