Vamos, vamos
lexus un poco de voluntad.
Código ASP:
Ver original'''Funcion para prohibir ciertas letras en la direccion
Function filtrar_palabras(texto)
Dim palabrasVector, palabras_prohibidas, i, esCadenaValida
'La ultima almohadilla no es necesaria, esto ocasiona un string vacio
palabras_prohibidas = "piso#apto#apartamento#oficina"
palabrasVector = Split(palabras_prohibidas, "#")
esCadenaValida = true
For i = 0 To UBound(palabrasVector)
'cambia el orden de los argumentos
if instr(1,texto,palabrasVector(i)) > 0 then
esCadenaValida = false
exit for
end if
Next
filtrar_palabras = esCadenaValida
End Function
Response.Write(filtrar_palabras("juan oficina") & "<br>")
Response.Write(filtrar_palabras("juan edificio") & "<br>")
Ahi debe quedar y si no me corto un....cabello
