Visualizzazione dei risultati da 1 a 4 su 4
  1. #1

    Problema nella raccolta dati in un form nel campo TEXTAREA

    vi faccio vedere SUBITO la pagina asp che ho uppato in un server aruba



    <%
    '============Linkbruttocane su specifiche MSDN================
    '* il corpo finale del messaggio contiene tutti i campi *
    '* inseriti nella pagina html, in pratica puoi mettere *
    '* tutti i campi che ti servono nel modulo di invio senza *
    '* fare altre configurazioni aggiuntive. *
    '================================================= ============

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

    '* voce da modificare con il proprio indirizzo email

    invioA = "miamail"

    '* 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 = "miamail"

    '------------fine modifiche necessarie------------------

    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) = "smtp.aruba.it"
    Flds(cdoSMTPServerPort) = 25
    Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
    Flds.Update

    With iMsg
    Set .Configuration = iConf
    .To = invioA
    .From = Request.Form("email")
    .Sender = invioDa
    .Subject = "Richiesta di preventivo"
    .TextBody = "E' stato inviato un messaggio dal sito da un utente per una richiesta di preventivo. Questi i dati raccolti: " & vbCrLf & corpoMessaggio & ""
    .Send
    End With
    %>


    il form raccoglie TUTTI i testi inseriti e me li riporta nell'email, comprese le scelte effettuate tramite i radiobutton e i checkbutton ma... non c'è verso di fargli leggere anche quello che l'utente inserisce nel campo TEXTAREA, che ho scritto così
    <textarea id="textareainput" name="nota" rows="10" cols="45"></textarea>

    dove diavolo sbaglio...?
    possibile che l'errore sia in questa parte della pagina asp?
    FOR numeroCampi = 1 TO (Request.Form.Count() - 1)

    grazie a tutti per l'aiuto...
    C.P.L.R.D.V.C.
    Campagna per la riabilitazione del vecchio ciauz.
    Ridatemi la mia faccina!

  2. #2
    Ciao
    al posto del ciclo FOR che ti riempie corpoMessaggio prova ad usare

    Codice PHP:
    For Each objItem In Request.Form 
    fieldName 
    objItem 
    corpoMessaggio  
    corpoMessaggio fieldName ": " 
    fieldValue Request.Form(objItem
    corpoMessaggio  corpoMessaggio fieldValue vbcrlf 
    Next 
    anche se non capisco perché escluda solo la textarea...
    ***************************
    Non può piovere per sempre...
    ***************************

  3. #3
    mi raccoglie il campotextarea ma mi incasina TUTTE gli altri campi.
    questo quello che raccoglievo prima, con il mio ciclo form, tutto perfettamente in ordine, tranne il campo textarea, che nel form è l'ultimo, in basso.

    *****
    nome del gruppo = Gruppo pienomonte 2
    numero dei partecipanti = 8
    anno1 = 2005
    anno2 = 1966
    anno3 = 1975
    lingua preferita = Scegli la lingua
    data stimata di arrivo = 09 Gen 2009
    arrivo - luogo = palermo
    arrivo - momento = Mattina
    data stimata di partenza = 07 Gen 2009
    partenza - luogo = catania
    partenza - momento = Mattina
    durata del soggiorno = 10
    area geografica = sicilia, sicilia orientale, malta, estensione in sud italia, napoli-pompei-ercolano, altro
    altra destinazione = pantelleria,
    servizi - trasporto = Pullman GT con accompagnatore
    servizi - sistemazione = Dimore storiche (ove disponibile)
    servizi - tipo di camera = Standard
    servizi - trattamento = Pernottamento e prima colazione
    transfers = si
    guide = si
    pastiextra = no
    assicurazione = no
    ******


    questo invece quello che mi raccoglie con il tuo ciclo FOR
    (il campo textarea c'è, l'ho evidenziato in nero)
    *******
    contatti - nome:
    contatti - telefono:
    contatti - cellulare:
    contatti - email:
    nazionalita1:
    nazionalita2:
    anno3: 1975
    nazionalita3:
    nazionalita4:
    nazionalita5:
    nazionalita10:
    durata del soggiorno: 10
    nome del gruppo: Gruppo pienomonte 2
    anno6:
    naz8:
    nota: Prova di un messaggio
    numero dei partecipanti: 8
    anno4:
    naz9:
    lingua preferita: Scegli la lingua
    anno1: 2005
    arrivo - luogo: palermo
    arrivo - momento: Mattina
    area geografica: sicilia, sicilia orientale, malta, estensione in sud italia, napoli-pompei-ercolano, altro
    anno2: 1966
    altra destinazione: pantelleria,
    anno5:
    altra lingua:
    altro servizio:
    area di interesse: archeologia, musei-gallerie-mostre, natura, eventi e manifestazioni locali, altro
    naz6:
    anno10:
    servizi - trasporto: Pullman GT con accompagnatore
    servizi - sistemazione: Dimore storiche (ove disponibile)
    servizi - tipo di camera: Standard
    servizi - trattamento: Pernottamento e prima colazione
    anno7:
    pastiextra: no
    naz7:
    anno8:
    guide: si
    anno9:
    partenza - luogo: catania
    partenza - momento: Mattina
    transfers: si
    data stimata di arrivo: 09 Gen 2009
    data stimata di partenza: 07 Gen 2009
    assicurazione: no


    assurdo.....!
    C.P.L.R.D.V.C.
    Campagna per la riabilitazione del vecchio ciauz.
    Ridatemi la mia faccina!

  4. #4
    risolto...!!!!

    questo il ciclo FOR giusto
    FOR numeroCampi = 1 TO (Request.Form.Count())


    questo quello di prima, che non restituiva il campo TEXTAREA
    FOR numeroCampi = 1 TO (Request.Form.Count() - 1)

    quanto mi piacerebbe capire che ACCIDENTI cambia.... ma QUANTO mi piacerebbe!


    grazie a tutti, comunque....
    C.P.L.R.D.V.C.
    Campagna per la riabilitazione del vecchio ciauz.
    Ridatemi la mia faccina!

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.