pontoNETpt
A comunidade PontoNetPT está direccionada a todos os programadores que trabalhem com a plataforma .NET.
Validando Números
Que Diabo!?!

Syndication

News

  • "Que Diabo!?!" é um blog que destina-se a mostrar um código mau escrito que nos faz pensar "Que Diabo o autor tava a pensar?"
    . Somente será abordado código .NET e arredores, como XML e SQL e a ideia veio do site The Daily WTF

    O objectivo é , para além de rir da desgraça alheia, mostrar o tipo de código que não se deve escrever em .NET.

    Se tiver um QD e quiser enviar para ser publicado, utilize a secção "Contact" do blog.
Eu, Israel Aéce estive a procurar por uma função para validar um determinado código. Logo, bastou-me fazer uma busca no Google e encontrar uma função (em T-SQL ou PL-SQL) que faça isso: (um trecho dela)

     pCmc7 CHAR(34) := trim(xcmc7);
     IF instr('0123456789',substr(pcmc7,2,1))>0 AND instr('0123456789',substr(pcmc7,3,1))>0 AND
        instr('0123456789',substr(pcmc7,4,1))>0 AND instr('0123456789',substr(pcmc7,5,1))>0 AND
        instr('0123456789',substr(pcmc7,6,1))>0 AND instr('0123456789',substr(pcmc7,7,1))>0 AND
        instr('0123456789',substr(pcmc7,8,1))>0 AND instr('0123456789',substr(pcmc7,9,1))>0 AND
        instr('0123456789',substr(pcmc7,11,1))>0 AND instr('0123456789',substr(pcmc7,12,1))>0 AND
        instr('0123456789',substr(pcmc7,13,1))>0 AND instr('0123456789',substr(pcmc7,14,1))>0 AND
        instr('0123456789',substr(pcmc7,15,1))>0 AND instr('0123456789',substr(pcmc7,16,1))>0 AND
        instr('0123456789',substr(pcmc7,17,1))>0 AND instr('0123456789',substr(pcmc7,18,1))>0 AND
        instr('0123456789',substr(pcmc7,19,1))>0 AND instr('0123456789',substr(pcmc7,20,1))>0 AND
        instr('0123456789',substr(pcmc7,22,1))>0 AND instr('0123456789',substr(pcmc7,23,1))>0 AND
        instr('0123456789',substr(pcmc7,24,1))>0 AND instr('0123456789',substr(pcmc7,25,1))>0 AND
        instr('0123456789',substr(pcmc7,25,1))>0 AND instr('0123456789',substr(pcmc7,26,1))>0 AND
        instr('0123456789',substr(pcmc7,27,1))>0 AND instr('0123456789',substr(pcmc7,28,1))>0 AND
        instr('0123456789',substr(pcmc7,29,1))>0 AND instr('0123456789',substr(pcmc7,30,1))>0 AND
        instr('0123456789',substr(pcmc7,31,1))>0 AND instr('0123456789',substr(pcmc7,32,1))>0 AND
        instr('0123456789',substr(pcmc7,33,1))>0 THEN
        ......

De "lambuja" já aprendi como verificar se o caracter é ou não um número. :P

Posted 10-11-2004 14:49 por Israel Aece e Joao Paulo Carreiro
Filed under:

Comments

Anonymous wrote re: Validando Números
on 1-7-2009 1:36
Bom hehe, não vou falar nada sobre o código, mas está falando igual o João hehe. "A procurar" hehe
Anonymous wrote re: Validando Números
on 2-7-2009 1:57
Bom hehe, não vou falar nada sobre o código, mas está falando igual o João hehe. "A procurar" hehe

Add a Comment

(requerido)  
(opcional)
(requerido)  
Remember Me?
If you can't read this number refresh your screen
Enter the numbers above:  
Powered by Community Server (Commercial Edition), by Telligent Systems