Imagem de Seguranca

[serpaulo 0]

Galera.... tudo belezera?

 

 

Entao estou quebrando a cabeca pra fazer esse codigo funcionar...

 

Minha Duvida é eu crio um doc asp com o nome seguranca.asp e no forumulario onde vai aparecer os numeros para a pessoa digitar eu chamo com

 

<img src="seguranca.asp">

?????

 

Se puderem me dar uma ajuda com isso pois estao mandando "spams" para o livro de visitas do site e queria tentar impedir isso....

 

 

Aproveitando a deixa, como impeco html no form, tipo o cara digita asdasdx e queria impedir tambem.

 

valeu gente

 

<%'Cria o Objeto pra manipular a nossa imagemSet Jpeg = Server.CreateObject("Persits.Jpeg")'Abre nossa imagem de fundoJpeg.Open Server.MapPath("novo-1.gif")'Configuração de cor, nome e tamanho da fonteJpeg.Canvas.Font.Color = &H000000Jpeg.Canvas.Font.Family = "Verdana"Jpeg.Canvas.Font.Size = 20'Define a variavel de sessão "seguranca"'e guarda nela o valor de nosso códigoSession("numero") = GerarCodigo'varNumero = GerarCodigo'Escreve na imagem o valor do códigoJpeg.Canvas.Print 5, 3, session("numero")'Envia ao browser, os dados binarios da imagemJpeg.SendBinary%><%Private Function GerarCodigo()Dim valores, i'Inicia a função com valor em brancoGerarCodigo = ""'Define um vetor com os elementos de nosso códigovalores = Array("0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z")	Randomize	For i = 1 to 7		GerarCodigo = GerarCodigo & valores(Int(uBound(valores) * Rnd))	NextEnd Function%>

[serpaulo 0]

Ow galerinha.... beleza?

 

Me da uma forca com esse codigo please!!!!!

 

 

 

Valeu gente http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[serpaulo 0]

Falae galera blezera...

 

Entao, a parte de implentar o codigo eu ja consegui ufaaaaa http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

Ogora tenho outra duvida, na pagina que processa os campos formulario e grava no banco estou usando um codigo assim.... esta certo?

 

 

<%

' Verifica se o valor digitado no campo do formulário é o mesmo que gerou a imagem no script img.asp

If Request.Form("txt_key") = Session("Senha") Then

CODIGO DE PROCESSAMENTO DO FORMULARIO

Else

Response.Write "Preencha o campo com os caracteres da imagem!"

End If

%>

 

 

Valeu galera

 

Paulo Sergio

[serpaulo 0]

Alguem ai por favor pra me dar uma forca com esse final de codigo....So falta isso :blink:

[serpaulo 0]

Falae Galera... desculpa a demora....

 

Entao consegui resolver o meu problemas aqui he he he....

 

Agora esta funcionando que é uma beleza....

 

 

Peguei outro codigo e instalei componente em casa que eu tinha esquecido... Valeu aos que tentaram me ajudar...

 

Flw e Merry Christmas - Feliz Natal http://forum.imasters.com.br/public/style_emoticons/default/natal_w00t.gif

 

Paulo

[Rendan 0]

Posta a solução final para todos ficarem sabendo da resposta!

 

http://forum.imasters.com.br/public/style_emoticons/default/natal_noel.gif