USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Scripts    (Validações)

Título da Dica:  Validar CNPJ
Postada em 25/7/2001 por Luis Ribeiro      Clique aqui para enviar email para o autor  lcr3@bol.com.br
<SCRIPT language=JavaScript>

function valida_CNPJ(s)
{
     var i;
     s = limpa_string(s);
     var c = s.substr(0,12);
     var dv = s.substr(12,2);
     var d1 = 0;
     for (i = 0; i < 12; i++)
     {
          d1 += c.charAt(11-i)*(2+(i % 8));
     }
        if (d1 == 0) return false;
        d1 = 11 - (d1 % 11);
     if (d1 > 9) d1 = 0;
     if (dv.charAt(0) != d1)
     {
          return false;
     }

     d1 *= 2;
     for (i = 0; i < 12; i++)
     {
          d1 += c.charAt(11-i)*(2+((i+1) % 8));
     }
     d1 = 11 - (d1 % 11);
     if (d1 > 9) d1 = 0;
     if (dv.charAt(1) != d1)
     {
          return false;
     }
        return true;
}

</SCRIPT>
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página