Ver Mensaje Individual
  #13 (permalink)  
Antiguo 04/03/2010, 13:18
Avatar de lexus
lexus
 
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 22 años, 3 meses
Puntos: 4
Respuesta: expresion regular para restringir letras

al parecer seria muy dificil obtener un patron porque las direcciones pueden ser escritas de muchas formas
crees que seria mas facil poner algunas palabras prohibidas mejor?
por ejemplo piso, apto, etc..? o no seria lo ideal.

tengo esta funcion que lo que hace es reemplazar palabras por algo..
sabrias como modificarla para que en lugar de reemplazar cuando encuentre al menos una de las palabras saque el error de que esta mal escrita?

Código ASP:
Ver original
  1. '''Funcion para prohibir ciertas letras en la direccion
  2. Function filtrar_palabras(texto)
  3.     Dim Temp, palabrasVector, palabras_prohibidas, reemplazar, i
  4.     reemplazar = "***"
  5.     palabras_prohibidas = "piso#apto#apartamento#oficina#"
  6.     Temp = texto
  7.     palabrasVector = Split(palabras_prohibidas, "#")
  8.     For i = 0 To UBound(palabrasVector)
  9.         Temp = Replace(Temp, palabrasVector(i), reemplazar, 1, -1, 1)
  10.     Next
  11.     filtrar_palabras = Temp
  12. End Function
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com