Come creare controlli sui campi dei moduli in ASP?

**hydra2005** · 14-02-2008, 00:45

Salve a tutti raga.
Ho bisogno di un piccolissimo aiutino con l'ASP.
Ho creato un guestbook con un modulo per l'inserimento dei commenti ma vorrei inserire dei controlli sui campi, perchè per esempio quando nel campo commenti qualcuno scrive ' o " appaiono errori perchè secondo il compilatore fa chiudere la stringa SQL...vabbè detto così forse non mi capirete molto ma se date un'occhiata alla parte di codice della pagina quì sotto capirete...

Mi serve solo capire come aggiungere dei controlli sul campo nome, link e commento per non far andare in blocco il browser e far apparire quelle noiose pagine di errore.

Vi prego aiutatemi non so come fare!!

Sub ShowAll()
MySQL="Select * from " & strTable
Set MyRs=MyConn.Execute(MySQL)
numerocampi=MyRs.fields.count -1
Response.Write("<html><head><title>Anfex.it // Post 1 // Commenti</title>")
Response.Write("<style type=""text/css""> html, body {width: 100%;height: 100%;margin: 0;padding: 0;cursor: auto;background: #000000 url(background_commenti.jpg) no-repeat top left;} </style></head>")
Response.Write("<script src=""http://www.google-analytics.com/urchin.js"" type=""text/javascript""></script><script type=""text/javascript"">_uacct = ""UA-3121020-2"";urchinTracker();</script>")
Response.Write("<script src=""modulo.js"" type=""text/javascript""></script>")
Response.Write("<body link=""#3333333"" vlink=""#333333"" alink=""#333333"" leftmargin=""0"" topmargin=""0"" marginwidth=""0"" marginheight=""0"">")
Response.Write("<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0""><tr><td></td>")
Response.Write("<td width=""20%"" bgcolor=""#FFFFFF""><div align=""center"">Back to the Post</font></div></td>")
Response.Write("</tr></table><center>

")
Response.Write("<TABLE width=""450"" Border=0 bordercolor=""#333333"" bgcolor=""#eeeeee"">")
Response.Write(strsql)
MyRs.movefirst
numeroCommenti = 1
Do While Not MyRs.EOF
Response.Write("<tr><td width=""10%""> <font color=""#333333"" size=""5"" face=""Arial, Helvetica, sans-serif"">")
Response.Write(numeroCommenti)
Response.Write("</font></td>")
Response.Write("<td><font color=""#333333"" size=""2"" face=""Geneva, Arial, Helvetica, sans-serif"">")
Response.Write(MyRs(1))
Response.Write(" scrive...</font></td></tr><tr>")
Response.Write("<td width=""10%"" bgcolor=""#eeeeee""></td>")
Response.Write("<td bordercolor=""#000000"" bgcolor=""d4d4d4""> <font color=""#333333"" face=""Geneva, Arial, Helvetica, sans-serif"" size=2> ")
Response.Write(MyRs(2))
Response.Write("</font></td></tr><tr>")
Response.Write("<td width=""10%"" bgcolor=""#eeeeee""></td>")
Response.Write("<td bordercolor=""#000000"" bgcolor=""d4d4d4""> <font color=""#333333"" size=""1"" face=""Geneva, Arial, Helvetica, sans-serif"">Link <a href="" ")
Response.Write(MyRs(3) & """ target=""_blank"">" & MyRs(3))
Response.Write("</a></font></td></tr><tr> ")
Response.Write("<td width=""10%"" bgcolor=""#eeeeee""></td>")
Response.Write("<td bordercolor=""#000000"" bgcolor=""d4d4d4""> <font color=""#333333"" size=""1"" face=""Geneva, Arial, Helvetica, sans-serif""> Data || ")
Response.Write(MyRs(4))
Response.Write("</font></td></tr>")
numeroCommenti = numeroCommenti+1
MyRs.movenext
loop
Response.Write("</table>")
MyRs.Close
Set MyRs = nothing
Response.Write("

<center>")
Response.Write("<table bordercolor=""#eeeeee"" bgcolor=""#eeeeee"">")
Response.Write("<form action=""" & strFile & "?mode=AddItemAction"" method=""post"" id=form1 name=form1 onSubmit=""return submitForms()"">")
Response.Write("<tr><td height=""17"" bgcolor=""#d4d4d4""><div align=""center"">")
Response.Write("<font color=""#333333"" face=""Geneva, Arial, Helvetica, sans-serif"" size=1>")
Response.Write("Name || Nome</font></div></td></tr>")

'campo Nome
Response.Write("<tr><td bgcolor=""#eeeeee""> <div align=""center"">")
Response.Write("<font size=""2"" color=""#FFFFFF"" face=""Arial, Helvetica, sans-serif"">")
Response.Write("<input name=""Nome"" type=""text"" value=""Anonimo"" size=35>")
Response.Write("</font></div></td></tr> ")
Response.Write("<tr><td height=""17"" bgcolor=""#d4d4d4""><div align=""center""><font color=""#333333"" face=""Geneva, Arial, Helvetica, sans-serif"" size=1>")
Response.Write("Text || Commento</font></div></td></tr>")

'campo Commenti
Response.Write("<tr><td bgcolor=""#eeeeee""> <div align=""center"">")
Response.Write("<font size=""2"" face=""Arial, Helvetica, sans-serif"" color=""#FFFFFF"">")
Response.Write("<textarea name=""Commento"" cols=""40"" rows=""6"" wrap=""VIRTUAL"" maxlength=""500""></textarea></font></div></td></tr>")
Response.Write("<tr><td height=""17"" bgcolor=""#d4d4d4"">")
Response.Write("<div align=""center""><font face=""Geneva, Arial, Helvetica, sans-serif""><font size=""1"">")
Response.Write("<font color=""#333333"">Link || Mail</font></font></div></font></td></tr>")

'campo Link
Response.Write("<tr><td><div align=""center""><font size=""2"" face=""Arial, Helvetica, sans-serif""> <input type=""text"" size=40 name=""Link"" value=""http://"">")
Response.Write("</font>[/b][/i]</font></div></td></tr>")

'campi Submit e Reset
Response.Write("<tr><td height=""32"" bgcolor=""#eeeeee""><div align=""center""><font color=""#FFFFFF"">")
Response.Write("<input type=""submit"" value=""Post it!"" name=""b1""><input type=""reset"" value=""reSET!"" name=""b2""></font></div></td>")
Response.Write("</tr></form></table>

</center></center>")

Response.Write("<table width=""100%"" height=""20"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0""><tr>")
Response.Write("<td width=""16%"" align=""left"" valign=""middle"" bgcolor=""#000000""> <div align=""left""><font color=""#FF3300"">")
Response.Write("<font size=""1"" face=""Arial, Helvetica, sans-serif"">")
Response.Write("[img][/img]</font></font></div></td>")
Response.Write("<td width=""17%"" align=""left"" valign=""middle"" bgcolor=""#000000"">")
Response.Write("<div align=""center""><font color=""#FF3300""></font></div></td>")
Response.Write("<td width=""32%"" bgcolor=""#000000""> <div align=""center""> ")
Response.Write("<font color=""#0099CC"" size=""1"" face=""Verdana, Arial, Helvetica, sans-serif""></font></div></td>")
Response.Write("<td width=""33%"" bgcolor=""#000000""> <div align=""center"">")
Response.Write("<a rel=""license"" href=""http://creativecommons.org/licenses/by-nc-nd/3.0/"">")
Response.Write("[img][/img]")
Response.Write("</a></div></td></tr></table></body></html>")

end sub

**webbiz** · 14-02-2008, 08:20

Puoi usare un controllo Js come YAV

**Mems** · 14-02-2008, 10:42

Le variabili recuperate da FORM o queryString, prima di passarle in una stringa SQL, devi passarle dalla funzione replace per rimpiazzare l'apice singolo con due apici singoli.

codice:

a = replace(a,"'","''")

**hydra2005** · 14-02-2008, 17:57

raga ho provato con YAV ma pur avendo eseguito tutti i passi non funziona.
Ho provato creando un'unica regola e cioè quella di settare il campo Nome come richiesto,
ma quando provo a inviare un commento senza nome mi riporta ad una pagina di errore con la solita scirtta che mi dice che il nome non può essere di dimensione 0.

Con la funzione replace invece ho corretto l'errore degli apici nel commento.

Mi restano solo due cose:

1 - creare un alert per far inserire un testo nel campo Nome

2- fare in modo che il campo Link siccome alla visualizzazione si crea un collegamento, non riporti all'indirizzo del mio path di dominio seguito dall'indirizzo aggiunto dall'utente.
Es:
se invio nel campo Link il testo "nome.cognome@provider.net" il mio guestbook mi creerà un collegamento del tipo "http://www.miodominio.it/nome.cognome@provider.net"

Grazie mille per gli aiuti!!!

Discussione: Come creare controlli sui campi dei moduli in ASP?

Strumenti discussione

Ricerca discussione

Visualizza

Come creare controlli sui campi dei moduli in ASP?

Permessi di invio