he buscado en el foro y no he encontraro
probe con una funcion par aquitar espacios repetidos, pero tampoco me funciono
quisiera saber si me pueden ayudar
la rutina de los espacios es esta
<%
Function QuitaEspacio(CadentaTXT)
frase = CadentaTXT
'Quitamos todos los espacios extras
For quita_espacios = 10 to 2 Step -1
For espacio = 1 to quita_espacios
mete_espacio = mete_espacio & " "
Next
frase = Replace(frase,mete_espacio," ")
mete_espacio = ""
Next
QuitaEspacio = frase
End Function
%>
lo que necesito es quitar los enters repetidos en una mensaje antew de guardarlo en la base de datos.
gracias
