Ver Mensaje Individual
  #15 (permalink)  
Antiguo 05/03/2010, 06:28
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

Hola gracias por ayudarme
lo probe asi con varias palabras y ambos me dieron verdadeero
lo cual deberia dar falso porque ingrese una palabra prohibida en el primer ejemplo


Código ASP:
Ver original
  1. '''Funcion para prohibir ciertas letras en la direccion
  2. Function filtrar_palabras(texto)
  3.     Dim  palabrasVector, palabras_prohibidas, i, esCadenaValida
  4.     palabras_prohibidas = "piso#apto#apartamento#oficina#"
  5.     palabrasVector = Split(palabras_prohibidas, "#")
  6.     esCadenaValida = true
  7.     For i = 0 To UBound(palabrasVector)
  8.         if instr(1,palabrasVector(i),texto) > 0 then
  9.             esCadenaValida = false
  10.             exit for
  11.         end if
  12.     Next
  13.     filtrar_palabras = esCadenaValida
  14. End Function
  15.  
  16. Response.Write(filtrar_palabras("juan oficina") & "<br>")
  17. Response.Write(filtrar_palabras("juan edificio") & "<br>")
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com