Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 13

Discussione: CDONTS niente panico!

  1. #1
    2002Moro
    Guest

    CDONTS niente panico!

    Ciao, so che ci sono 1000 post su quest'argomento, ma li ho provati tutti e non ne vengo a capo..

    Piattaforma Win 2000 Server

    Problema1:
    Ho un form "modulo.html" che invia i dati tramite una pagina "mail.asp"

    Nel form ci sono 4 campi: Nome, Cognome, email, Testo, ed un menù di selezione a tendina con 5 voci.

    Vorrei fare in modo che cliccando il pulsante invia, la pagina mi facesse prima un controllo su tutti i campi eccetto il menù a tendina, e che poi se tutti compilati mi spedisse il modulo,
    al contrario se invece qualche campo è lasciato vuoto vorrei che mi avvertisse senza inviare il modulo..
    Come fare

    Problema2:
    Nella pagina mail.asp uso il seguente codice

    codice:
    dim link 
    
    Set link = CreateObject("CDONTS.Newmail")
    link.From = "Sito@nomeSito.com"
    link.To = "Sito@nomeSito.com"
    link.Subject = "Contatto dal sito kirienko.com"
    link.BodyFormat = 0 
    link.MailFormat = 0
    link.Body = "Nome: " & request.form("Nome") & "Cognome: " & request.form("Cognome") & "Provenienza: " & request.form("Provenienza") & "e-mail: " & request.form("email")& "Messagio: " & request.form("Note")
    
    link.Send
    Set link = Nothing
    %>
    Tutto mi arriva, ma su una riga sola, come faccio a creare gli accapi dopo ogni voce?

    Ringrazio anticipatamente chiunque sia in grado di darmi una mano.. :bubu:

  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    codice:
    link.Body = "Nome: " & request.form("Nome") & VbCrLf & "Cognome: ".....
    Per i controlli...

    codice:
    if len(trim(request.form("nome"))) = 0 then
    'Campo vuoto
    end if
    Roby

  3. #3
    2002Moro
    Guest
    Mitico! ora ci provo!
    Mi potresti spiegare un po lo script per i controlli?

  4. #4
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Semplice, devi verificare che quello che ti torna dal form non sia vuoto.
    Se lo è, attivi una variabile "errore" nella quale stabilisci il messaggio di errore da far apparire per ognuno dei campi non compilati.
    Altrimenti tutto ok.

    Roby

  5. #5
    2002Moro
    Guest
    sono un caprone in asp e java, lo so..
    ma dimmi se sbaglio..

    if len(trim(request.form("nome"))) = 0 then
    'Campo vuoto
    end if
    if len(trim(request.form("cognome"))) = 0 then
    'Campo vuoto
    end if
    if len(trim(request.form("email"))) = 0 then
    'Campo vuoto
    end if
    e poi?
    per fare uscire l'essore?
    se tutto corretto come vado avanti?

    Grazie ancora per la cortesia

  6. #6
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    codice:
    errore = ""
    if len(trim(request.form("nome"))) = 0 then 
    errore = errore &"Nome errato 
    "
    end if 
    if len(trim(request.form("cognome"))) = 0 then 
    errore = errore &"Cognome errato 
    "
    end if 
    if len(trim(request.form("email"))) = 0 then 
    errore = errore &"E-Mail errata 
    "
    end if 
    
    if errore = "" then
    'non ci sono errori e fai quello che vuoi
    else
    'ci sono errori
    response.write errore
    end if
    Roby

  7. #7
    2002Moro
    Guest
    Ciao, ho provato gli accapi...
    ma non mi funzionano,
    ecco quello che mi arriva..

    codice:
    Nome: xxx Cognome: xxx Provenienza: xxx e-mail: xxx Messagio: xxxxx
    codice:
    <%
    dim link 
    
    Set link = CreateObject("CDONTS.Newmail")
    link.From = "Sito@kirienko.com"
    link.To = "johnny@email.it"
    link.Subject = "Contatto dal sito kirienko.com"
    link.Body = "Nome: " & request.form("Nome") & VbCrLf & "Cognome: " & request.form("Cognome") & VbCrLf & "Provenienza: " & request.form("Provenienza") & VbCrLf & "e-mail: " & request.form("email")& VbCrLf & "Messagio: " & request.form("Note")
    link.BodyFormat = 0 
    link.MailFormat = 0
    link.Send
    Set link = Nothing
    %>
    come mai?

  8. #8
    2002Moro
    Guest
    risolto...
    "
    " &
    avevo dimenticato di agguingerlo dopo ogni campo..

  9. #9
    2002Moro
    Guest
    sono sempre io..
    ok mi hai dato il codice per rilevare gli errori..
    ma dove lo scrivo

    codice:
    errore = ""
    if len(trim(request.form("nome"))) = 0 then 
    errore = errore &"Nome errato 
    "
    end if 
    if len(trim(request.form("cognome"))) = 0 then 
    errore = errore &"Cognome errato 
    "
    end if 
    if len(trim(request.form("email"))) = 0 then 
    errore = errore &"E-Mail errata 
    "
    end if 
    
    if errore = "" then
    'non ci sono errori e fai quello che vuoi
    else
    'ci sono errori
    response.write errore
    end if
    questo è il codice della pagina con il form..

    codice:
    <?xml version="1.0" encoding="iso-8859-1"?>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head>
    <title>Home Ilizarov</title>
    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
    <link href="Form_Style.css" rel="stylesheet" type="text/css" />
    
    <script type="text/javascript"> 
    <!-- 
     
    //--> 
    </script>
    </head>
    
    <body bgcolor="#D4E8FB" background="Immagini/Sf-home.gif" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" class="Sfondo">
    <form action="mail.asp" method="post" name="modulo" id="modulo" dir="ltr" lang="it">
    <table width="461" border="0" cellpadding="0" cellspacing="0" id="tab-form">
      <tr>
        <td class="titolo"><span class="titolo"><span class="corpo Stile5"></span>
    
          Contatta il Dott.
          Alexander Kirienko
    
          
    
        </span></td>
        </tr>
      <tr>
        <td class="titolo-celle">Nome:
          <input name="Nome" type="text" class="campi" id="Nome" size="15" maxlength="30" />
           Cognome:
           <input name="Cognome" type="text" class="campi" id="Cognome2" size="15" maxlength="30" />
        </td>
        </tr>
      <tr>
        <td class="titolo-celle"></td>
        </tr>
      <tr>
        <td class="titolo-celle">e-mail: 
          <input name="email" type="text" class="campi" id="email" size="15" maxlength="40" />
          Citt&agrave;:
          <input name="Provenienza" type="text" class="campi" id="Provenienza" value="   Indicare Luogo e Provincia" size="38" maxlength="100" />      </td>
        </tr>
      <tr>
        <td class="titolo-celle">
    
          Motivo del contatto:
            <select name="MotivoContatto" size="1" id="select" class="campi">
            <option selected="selected">Seleziona il Motivo </option>
            <option value="Richiesta Informazioni">Richiesta Informazioni </option>
            <option value="Richiesta Visita">Richiesta Visita </option>
            <option value="Sono un Suo Paziente">Sono un Suo Paziente </option>
            <option value="Altro">Altro..</option>
            </select>      </td>
        </tr>
      <tr>
        <td class="titolo-note"> 
          <textarea name="Note" cols="75" rows="11" id="Note" class="note"></textarea>
        </td>
        </tr>
      <tr>
        <td class="controllo">
    
          Tutti i campi devono essere compilati per poter inviare il
          modulo</td>
      </tr>
      <tr>
        <td><input type="submit" name="Submit" value="Spedisci" class="pulsanti" />
          <input type="reset" name="Submit2" value="Riscrivi" class="pulsanti" />
          <span class="titolo-celle">[img]../immagini/spacer.gif[/img]Torna Indierto</span></td>
      </tr>
    </table>
    	</form></body>
    </html>
    dove lo inserisco?

    ultima cosuccia..

    come faccio rilevare alla pagina di invio del form la scelta del campo menù :master: ??

  10. #10
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Non nella pagina del form, nell'altra!

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