Tema: Replace
Ver Mensaje Individual
  #13 (permalink)  
Antiguo 16/03/2006, 11:57
tammander
 
Fecha de Ingreso: enero-2006
Ubicación: Torroles (Costa der Só)
Mensajes: 1.017
Antigüedad: 19 años, 4 meses
Puntos: 7
¿porque no delegas en una funcion todo el tema de filtrado de caracteres?

Código:
function checkText(esto)
   Dim t_esto
   t_esto = esto
   if t_esto<>"" then
       t_esto = replace(t_esto,"'", "''")
       t_esto = replace(t_esto,vbcrlf,"<br />")
       ' Y asi, hasta el infinito y más allá
       ' Incluso puedes usar expresiones regulares... 
   end if
   checkText = t_esto
end function
Otra cosa, busca en google (foxpro provider memo) mas información sobre esto. FoxPro no tiene el proveedor de ODBC totalmente operativo.



Un saludo
__________________
"Tus pecados son el estiércol sobre el que florecerán las flores de tus virtudes" - Gerald Messadié -