Salve ragazzi,
ho un problemino, ho scaricato il codice captcha di Behrooz Sangani,
tutto funziona bene, tranne un piccolo particolare, i numeri da verificare me li visualizza in verticale invece che in orizzontale, eppure ho copiato il codice dal file stesso del produttore...
Chi ha la pazienza di aiutarmi??
Ecco il codice (potete provarlo, gira bene):
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
'CALCOLO LE VARIABILI
check = Request.QueryString("check")
nome = Request.QueryString("nome")
citta = Request.QueryString("citta")
email = Request.QueryString("email")
messaggio = Request.QueryString("messaggio")
imagefield = Request.QueryString("imagefield")
%>
<!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>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Documento senza titolo</title>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
-->
</style></head>
<%
if check = "nome" then%>
<body onLoad="alert('Inserisci il tuo nome!!');">
<%end if %>
<%
if check = "citta" then%>
<body onLoad="alert('Inserisci la tua città!!');">
<%end if %>
<%
if check = "messaggio" then%>
<body onLoad="alert('Inserisci il tuo pensiero per Silvia!!');">
<%end if %>
<%
if check = "imagefield" then%>
<body onLoad="alert('Attenzione!! Digita correttamente i numeri visualizzati nell apposito campo.');">
<%end if %>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<form method="post" action="chaptcha.asp" name="form1">
<table align="center">
<tr valign="baseline">
<td nowrap align="right">Nome:</td>
<td><input type="text" name="nome" value="<%=nome%>" size="32">
* </td>
</tr>
<tr valign="baseline">
<td nowrap align="right">Citta:</td>
<td><input type="text" name="citta" value="<%=citta%>" size="32">
* </td>
</tr>
<tr valign="baseline">
<td nowrap align="right">Email:</td>
<td><input type="text" name="email" value="<%=email%>" size="32"> </td>
</tr>
<tr valign="baseline">
<td align="right" valign="top" nowrap>Messaggio:</td>
<td><textarea name="messaggio" cols="25" rows="6"><%=messaggio%></textarea></td>
</tr>
<tr valign="baseline">
<td height="61" colspan="2" align="right" valign="middle" nowrap><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center">Digita i numeri visualizzati
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="33%"><table border="1" bordercolor="#ADC1D6" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" style="border-collapse: collapse">
<tbody>
<tr>
<td><%
Dim ImageNo, RndNum
Randomize Timer
ImageNo = CStr(Fix(99999 * Rnd)) 'Here you can set the max number of images to be shown, ie. 99999999
Session("ImageNo") = ImageNo 'Session variable of the final number to be shown
For i = 1 To Len(ImageNo)
RndNum = 99999 * Rnd 'Random number to avoid caching
' here, 'img' shows which number should be displayed, we write the image tag
' to get the image from asp page.
Response.Write "[img][/img]"
Next
%> </td>
</tr>
</tbody>
</table></td>
<td width="67%"><div align="center">
<input name="imagefield" type="text" id="imagefield" />
*</div></td>
</tr>
</table>
</div></td>
</tr>
</table></td>
</tr>
<tr valign="baseline">
<td colspan="2" align="right" nowrap></td>
</tr>
<tr valign="baseline">
<td colspan="2" align="right" nowrap><div align="center">
<input name="submit" type="submit" value="Firma il Guestbook" />
</div></td>
</tr>
</table>
<input type="hidden" name="Data" value="<%=now()%>" >
<input type="hidden" name="MM_insert" value="form1">
</p>
</form>
<p align="center">* Campi obbligatori. </p></td>
</tr>
</table>
</body>
</html>
Non è tutto ASP puro, c'è un pò di DW.
Grazie!!

Rispondi quotando