domingo, 14 de julho de 2002

Testando CEP via expressão Regular (Regular Expression)

Expressão Regular (Regular Expression) que testa a sintaxe de um cep (no formato 12345-123) O retorno da função e true (verdadeiro) ou false (falso) teste a função como no exemplo abaixo:


<%


xxx = "12345-123"


if(cep(xxx)) then
 Response.Write("CEP OK!")
else
 Response.Write("CEP Incorreto!")
End If 


function cep(strcep)


 Set regEx = New RegExp  'Cria o Objeto Expressão


 regEx.Pattern = "\d{5}-\d{3}"    ' Expressão Regular
 regEx.IgnoreCase = True         ' Sensitivo ou não
 regEx.Global = True                ' Não sei exatamente o que faz 


 cep = RegEx.Test(strcep)
 
 Set regEx = Nothing


End Function


%>



Esta matéria foi postada originalmente no ASP4Developers por Daniel Passos (site), que na época era "Consultor de TI com fortes conhecimentos nas linguagens HTML, JavaScript, Perl, ASP e PHP. Conhecimentos básicos de Java (Swing, JSP & Servlets), orientação a objetos e UML, Banco de dados MySQL, SQL Server e Oracle.". Hoje, vai saber...

0 comentários: