controllo campi

**naps** · 28-09-2005, 11:08

Salve a tutti,

vi pongo il mio problemino,
ultimamente ho fatto una pagina di invio email tramite CDONTS.NewMail
e con dreamweaver, vorrei capire come posso inserire dei controlli sui campi che ho inserito. ho cercato in giro ho trovato ma non so
come applicarlo visto che non sono tanto bravo con asp. :rollo:

questa e' la pagina che ho assemblato copiando qua' e la'(funzionante

)

codice:

<%
' Controlla che il pulsante submit abbia come nome "invia"
If Request("invia") <> "" Then

Dim Mail
Set Mail = CreateObject("CDONTS.NewMail")
Mail.From = request.form("email")
Mail.To = Request("email")

'Destinatario nascosto della mail
Mail.bcc = "info@email.it"


' Oggetto del messaggio
Mail.Subject = "Conferma iscrizione"
' Corpo del messaggio
Mail.Body = "Ciao " & Request("nome") & "," & _
Chr(13) & Chr(10) & _
"hai ricevuto questa mail perchè " & _
"hai richiesto l'iscrizione al nostro sito." & _
Chr(13) & Chr(10) & _
"La password che ti è stata assegnata è:" & Chr(13) & Chr(10) & _
Request("password") & _
Chr(13) & Chr(10) & Chr(13) & Chr(10) & _
"Per confermare l'iscrizione clicca su questo link" & Chr(13) & Chr(10) & _
"http://www.miosito.it/conferma.asp?password=" & Request("password") & _
Chr(13) & Chr(10) & Chr(13) & Chr(10) & _
"Saluti dal webmaster del sito " 

strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Send ' send message
If Err <> 0 Then ' error occurred
strErr = Err.Description
else
bSuccess = True
End If
End If
%>
<html>
<head>
<title>Registrazione</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../parametri.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#293852" text="#FFFFFF" link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF" leftmargin="40" topmargin="20">
<form ACTION="<%=MM_editAction%>" METHOD="POST" name="form1">
  <table width="900" height="596" border="0" cellpadding="0" cellspacing="0">
    <tr> 
      <td width="295" height="309" rowspan="3" valign="top"> <table width="194" border="0" cellpadding="0" cellspacing="0" class="menu">
          <tr> 
            <td width="489">[img]../immagini/logo.gif[/img]</td>
          </tr>
          <tr> 
            <td>[img]../immagini/pixelsf.gif[/img]</td>
          </tr>
          <tr> 
            <td height="508"> 
            </td>
          </tr>
        </table></td>
      <td width="605" height="67" valign="top"></td>
    </tr>
    <tr> 
      <td height="30" valign="top"></td>
    </tr>
    <tr> 
      <td height="499" valign="top"> <table width="404">
          <tr valign="baseline"> 
            <td width="56" nowrap></td>
            <td width="14" nowrap></td>
            <td nowrap><font size="2" face="Arial, Helvetica, sans-serif">Pagina 
              di Registrazione</font></td>
          </tr>
          <tr valign="baseline"> 
            <td colspan="3" nowrap>[img]../immagini/pixelsf.gif[/img]</td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap> <div align="right"><font size="1" face="Arial, Helvetica, sans-serif">Nome 
                </font></div></td>
            <td nowrap><font size="1" face="Arial, Helvetica, sans-serif">*</font></td>
            <td width="318"> <font size="1" face="Arial, Helvetica, sans-serif"> 
              <input type="text" name="nome" size="53">
              </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap> <div align="right"><font size="1" face="Arial, Helvetica, sans-serif">Cognome 
                </font></div></td>
            <td nowrap><font size="1" face="Arial, Helvetica, sans-serif">*</font></td>
            <td> <font size="1" face="Arial, Helvetica, sans-serif"> 
              <input type="text" name="cognome" size="53">
              </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap><div align="right"><font size="1" face="Arial, Helvetica, sans-serif">Company 
                </font></div></td>
            <td nowrap></td>
            <td><font size="1" face="Arial, Helvetica, sans-serif"> 
              <input name="company" type="text" id="societa2" size="53">
              </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap><div align="right"><font size="1" face="Arial, Helvetica, sans-serif">Citta'</font></div></td>
            <td nowrap></td>
            <td><font size="1" face="Arial, Helvetica, sans-serif"> 
              <input name="citta" type="text" id="societa" size="53">
              </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap> <div align="right"><font size="1" face="Arial, Helvetica, sans-serif">Email 
                </font></div></td>
            <td nowrap><font size="1" face="Arial, Helvetica, sans-serif">*</font></td>
            <td> <font size="1" face="Arial, Helvetica, sans-serif"> 
              <input type="text" name="email" size="53">
              </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap></td>
            <td nowrap></td>
            <td></td>
          </tr>
          <tr valign="baseline"> 
            <td valign="top" nowrap> <div align="right"><font size="1" face="Arial, Helvetica, sans-serif">Note</font></div></td>
            <td valign="top" nowrap></td>
            <td><font size="1" face="Arial, Helvetica, sans-serif"> 
              <textarea name="nota" cols="40" rows="5" id="nota"></textarea>
              </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap align="right"></td>
            <td nowrap align="right"></td>
            <td> <font size="1" face="Arial, Helvetica, sans-serif"> 
              <input type="hidden" name="password" value="<%=GeneratePassword(8)%>" size="32">
              <input name="dataora" type="hidden" id="dataora2" value="<%=now()%>">
              

              <input name="invia" type="submit" id="invia" value="conferma">
              </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap align="right"></td>
            <td nowrap align="right"></td>
            <td> <font size="1" face="Arial, Helvetica, sans-serif">* 
              dati obbligatori. </font></td>
          </tr>
          <tr valign="baseline"> 
            <td nowrap align="right"></td>
            <td nowrap align="right"></td>
            <td></td>
          </tr>
          <tr valign="baseline"> 
            <td height="117" align="right" nowrap></td>
            <td nowrap align="right"></td>
                      </tr>
        </table></td>
    </tr>
  </table>
  <input type="hidden" name="MM_insert" value="form1">
</form>


</p>
</body>
</html>

come posso applicare un codice semplice anche per capire
il funzionamento?

GRazie anticipatamente.

**Galex** · 28-09-2005, 11:22

If Request("invia") <> "" Then

If Trim(Request.form("email")) = "" Then

response.write "Non hai digitato il tuo indirizzo email"
response.end

end if

Dim Mail
Set Mail = CreateObject("CDONTS.NewMail")
Mail.From = request.form("email")
Mail.To = Request("email")

**naps** · 28-09-2005, 11:34

ok, grazie ma se ho piu campi da controllare come gestisco
questo ultimo script?

codice:

If Request("invia") <> "" Then 

If Trim(Request.form("email")) = "" Then 

response.write "Non hai digitato il tuo indirizzo email" 
response.end 

end if 

Dim Mail 
Set Mail = CreateObject("CDONTS.NewMail") 
Mail.From = request.form("email") 
Mail.To = Request("email")

:rollo:

**Galex** · 28-09-2005, 11:38

ad esempio facendo un if x ogni campo....

oppure più carino (secondo me):

errori=""

If Trim(Request.form("email")) = "" Then
errori="Non hai digitato il tuo indirizzo email
"
end if
If Trim(Request.form("nome")) = "" Then
errori=errori&"Non hai digitato il nome
"
end if
If Trim(Request.form("cognome")) = "" Then
errori=errori&"Non hai digitato il cognome
"
end if
If Len(Trim(Request.form("cognome")))>20 Then
errori=errori&"Il campo cognome contiene più di 20 caratteri
"
end if

if errori<>"" then
response.write errori
response.end
end if

**naps** · 28-09-2005, 11:46

ma il controllo dei campi non dovrebbe partire prima dell'inserimento
dei dati nel db? cliccando e' come se ignorasse i controlli sui campi.
e mi restituisce:

codice:

Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Driver ODBC Microsoft Access] Il campo "login.email" non può contenere una stringa di lunghezza zero.
/register/TMP2c44vnitj9.asp, line 115

ma penso sia dovuto all'inserimento del record nel db.
quell'errore vuol dire che il campo e' vuoto cioe' non ha un valore
ed e' per questo che si blocca?? si puo' settare il codice
che se anche il campo e' vuoto comunque di inserire i dati nel db?

scusami..

**Galex** · 28-09-2005, 12:02

ovviamente il controllo sui campi va prima del loro utilizzo...che sia x spedire un email o x popolare un db...(nella tua domanda inziale nn parlavi di db)

il tuo errore è dovuto al fatto che il campo email della tabella login nel tuo db access ha la proprietà "consenti lunghezza zero" settata a No...se metti Si nn ti dà + errore

**naps** · 28-09-2005, 12:07

Grazie funziona!

Sei GRANDE!!!

ho visto che mi restituisce il controllo su un'altra pagina
si puo' prsonalizzare come essaggio di alert...?
cosi' evito di cambiare pagina..

**Galex** · 28-09-2005, 12:13

bhe se ti dai i messaggi di errore su un altra pagina è solo xchè nell'action del form hai messo come destinazione un altra pagina,x far tutto nella stessa pagina devi modificare il tuo codice...
x far comparire il messaggio come alert devi utilizzare javascript...o trasferendo tutti i controlli sul form lato client,oppure lasciando i controlli lato server è mettendo solo l'output su di un alert (basta che passi la stringa errori a js)...ma non ne vedo l'utilità xchè lasciando il codice così com'è ti comparirebbe cmq in un altra pagina

**naps** · 28-09-2005, 12:14

scusami il controllo errore su mail si puo' aggiungere il controllo sulla @ ?

scuami ancora

**Galex** · 28-09-2005, 12:17

x un controllo serio dovresti utilizzare le regular expression..per cui trovi 2000 esempi facendo una ricerca nel forum...se ti basta invece sapere se l'indirizzo email digitato contiene @ puoi far così:

if Instr(request.form("email"),"@")>0 then
'contiene @
else
'non contiene @
end if

Discussione: controllo campi

Strumenti discussione

Ricerca discussione

Visualizza

controllo campi

campi obbligatori

mi da un'errore

Perfetto!!

...sul controllo email la @

Permessi di invio