Modificar Archivo Texto.

Prueba con

mTexto = FileToStr("ARCHIVO.TXT")
mTexo = StrTran(mTexto, "CADENA A BUSCAR","NUEVA CADENA")
StrToFile("ARCHIVO.TXT", mTexto)



"Ricardo Andrés Muñoz M." escribió en el
mensaje news:ec5901c3f0b7$deafcb10$
Hola como están:
Necesito antes de cargar en una tabla .dbf modificar el
archivo texto, reemplazando directamente en el .txt una
cadena de caracteres por otra Ej: reemplazar "H16 000" por
16, ¿existe algún código que lo haga automáticamente?, si
alguien me puede ayudar le agradecería mucho. :-)


Att: RAM2...

muy interesante...


"Heberto Villavicencio" escribió en el mensaje
news:

Prueba con

mTexto = FileToStr("ARCHIVO.TXT")
mTexo = StrTran(mTexto, "CADENA A BUSCAR","NUEVA CADENA")
StrToFile("ARCHIVO.TXT", mTexto)



"Ricardo Andrés Muñoz M." escribió en el
mensaje news:ec5901c3f0b7$deafcb10$
Hola como están:
Necesito antes de cargar en una tabla .dbf modificar el
archivo texto, reemplazando directamente en el .txt una
cadena de caracteres por otra Ej: reemplazar "H16 000" por
16, ¿existe algún código que lo haga automáticamente?, si
alguien me puede ayudar le agradecería mucho. :-)


Att: RAM2...

Oye Heberto, muchas gracias por las instrucciones, me
sirvieron de mucho en una pequeña aplicación que estoy
desarrollando
:-)

Prueba con

mTexto = FileToStr("ARCHIVO.TXT")
mTexo = StrTran(mTexto, "CADENA A BUSCAR","NUEVA CADENA")
StrToFile("ARCHIVO.TXT", mTexto)



"Ricardo Andrés Muñoz M."

escribió en el

mensaje news:ec5901c3f0b7$deafcb10$
Hola como están:
Necesito antes de cargar en una tabla .dbf modificar el
archivo texto, reemplazando directamente en el .txt una
cadena de caracteres por otra Ej: reemplazar "H16 000" por
16, ¿existe algún código que lo haga automáticamente?, si
alguien me puede ayudar le agradecería mucho. :-)


Att: RAM2...


.