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

    non invia il corpo del form

    ho i due file

    il primo segnala.asp

    <html>

    <head>
    <title>SEGNALA SITO</title>
    </head>

    <body>



    <font face="Verdana" size="4">&gt; Segnala ad un amico</font></p>
    <form method="POST" action="Segnala_Invia.asp">
    <table border="0" cellpadding="0" cellspacing="0" width="100%">
    <tr>
    <td width="20%" bgcolor="#D3DFE4"><font face="Verdana" size="2">Tua
    E-mail:</font></td>
    <td width="80%" bgcolor="#D3DFE4"><input type="text" name="mittente" size="20"></td>
    </tr>
    <tr>
    <td width="20%" bgcolor="#D3DFE4"><font face="Verdana" size="2">E-mail
    amico:</font></td>
    <td width="80%" bgcolor="#D3DFE4"><input type="text" name="destinatario" size="20"></td>
    </tr>
    <tr>
    <td width="20%" bgcolor="#D3DFE4"><font face="Verdana" size="2">Testo:</font></td>
    <td width="80%" bgcolor="#D3DFE4"><textarea rows="7" name="testo" cols="43">IL MIO SITO è un portale creato grazie ai consigli sull'ASP di Salvatore Aranzulla
    http://www.sito.it</textarea></td>
    </tr>
    <tr>
    <td width="100%" colspan="2" bgcolor="#D3DFE4"><input type="submit" value="Segnala sito!" name="B1"></td>
    </tr>
    </table>
    </form>


    </p>

    </body>

    </html>


    il secondo segnala_invia.asp

    <html>

    <head>
    <title>SEGNALA SITO</title>
    </head>

    <body>
    <%

    ' CONTROLLA PRIMA SE TUTTI I CAMPI SONO STATI COMPILATI CORRETTAMENTE

    IF Instr(Request.Form("mittente"), "@") = 0 or Instr(Request.Form("mittente"), ".") = 0 or Instr(Request.Form("destinatario"), "@") = 0 or Instr(Request.Form("destinatario"), "@") = 0 or Request.Form("testo") = "" then

    ' NON TUTTI I CAMPI SONO STATI COMPILATI
    %>
    <hr>
    <p align="center"><font face="Verdana" size="4">Compila tutti i campi!</font></p>
    <hr>
    <%
    ' ALTRIMENTI
    ELSE

    ' SI IMPOSTA PER INVIARE L'EMAIL DI SEGNALAZIONE:

    ' UN OGGETTO PER L'EMAIL DI SEGNALAZIONE
    oggetto = "Segnalazione sito"

    Set email = CreateObject("CDO.Message")


    ' MITTENTE
    Email.From = Request.Form("mittente")


    ' DESTINATARIO
    Email.To = Request.Form("destinatario")


    ' OGGETTO
    Email.Subject = oggetto


    ' FORMATO EMAIL (FORMATO: TESTO)

    Email.TextBody = Request.Form("formato")


    ' TESTO EMAIL

    Email.TextBody = testo

    Email.Send

    Set Email = Nothing
    %>
    <hr>
    <p align="center"><font face="Verdana" size="4">Grazie per averci segnalato ai tuoi amici!</font></p>
    <hr>
    <%
    END IF
    %>

    </body>

    </html>

    riesce ad inviare il form, il destinatario lo riceve ma non riceve il cordpo della textarea.
    grazie e saluti alla community in particolare ai moderatori sempre precisi e rapidi

  2. #2
    forse devi settare la variabile testo:
    testo = Request.Form("testo")

    oppure:

    Email.TextBody = Request.Form("testo")

    altrimenti la variabile testo è vuota
    Non dire gatto se non ce l'hai nel sacco! ATTIA!

  3. #3

    perfetto grazie

    la giusta era la prima. grazie come sempre

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 © 2025 vBulletin Solutions, Inc. All rights reserved.