Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/12/2007, 11:14
Blasito48
 
Fecha de Ingreso: diciembre-2007
Mensajes: 5
Antigüedad: 17 años, 5 meses
Puntos: 2
Sistema Catpcha en ASP

Saludos

Soy nuevo en esto de la programacion con ASP, tengo un formulario de Contactos en mi pagina web llamado contactos.asp el cual llama un ASP (contactar.asp) cuando se presiona el boton enviar, hasta alli todo funciona perfecto y sin problemas.

Quiero implementar un sistema Catpcha (identificacion humana), asi que he cambiado en evento del boton enviar por contactos.asp efectivamente el sistema Catpcha funciona de maravilla y cada vez que se carga da un numero captcha diferente.

Aqui pego el codigo que utilizo:

if Request.ServerVariables("REQUEST_METHOD") = "POST" then
strCAPTCHA = Trim(Request.Form("strCAPTCHA"))
if CheckCAPTCHA(strCAPTCHA) = true then
%>
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.miweb.com.co"
Mail.From = "[email protected]"
Mail.FromName = "Contactos Web Carficol S.A"
Mail.Subject= "Contacto Pagina Web"
Mail.Body = "Contactos Pagina Web " & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Fecha y Hora :--> " & now() & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Datos del Contacto" & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Nombre: " & Request.Form("nombre") & VbCrLf
Mail.Send
if Err <> 0 Then
Response.Write Err.Description
else
<script language="JavaScript" >
alert("El mensaje fue enviado correctamente");
</script>
end if
<%
else
%>
<script language="JavaScript" >
alert("Imposible enviar este mensaje, el codigo de seguridad NO es valido");
</script>
<%

Cuando le doy click a enviar y el codigo catpcha que he colocado es diferente al que aprece en la imagen pues funciona de maravilla y muestra el error, pero si lo pongo igual el codigo catpcha dice que se ha enviado pero no llega nada.

No se por que antes funcionaba perfecto el Request.Form("nombre") y ahora ya no, recuerden que "nombre" es un campo de un formulario.

Agradezco su valiosa colaboracion.

Ing. Bladimir Silva T
Colombia