Modificar un archivo txt

Me llamo juan carlos la verdad soy nuevo en Visual Fox 6 quería saber si alguien tiene código para modificar un archivo txt ejemplo:
nombre del archivo: "TODOVISUAL.TXT"
Contenido: " 455556666 juan palomino arzapalo"
Pero yo necesito obtener : "000455556666 juan palomino arzapalo"
En resumen necesito aumentar tres ceros al inicio.

1 respuesta

Respuesta
1
Si solo se trata de ingresar tres ceros al inicio del archivo inenta:
=StrToFile( "000" + FileToStr( "todovisual.txt" ), "todovisual.txt" )
Lo puedes ejecutar en la ventana de comandos
Gracias por la respuesta tan rápida :D, pero con esa sentencia solo modifico la primera linea del archivo, en caso tuviera más de 5 lineas mi archivo de texto solo se modifica la primera linea... EJEmplo:
Nombre del archivo :"todovisual.txt"
COntenido:    123456   juan ana maria
                       123467  alberto julio carlos
                       123468 placido saturnino octavio
Pero lo que espero como resultado es: 000123456 juan ana maría
                                                                000123467 alberto julio carlos
                                                                000123468 placido satunino octavio
Gracias :D
Por eso dije, si solo se trata de ingresasar tres ceros al inicio del archivo.
Intenta:
cCadena = FileToStr( "todovisual.txt" )
cCadena = "000" + StrTran( cCadena, Chr(13) + Chr(10), Chr(13) + Chr(10) +"000" )
=StrToFile( "000" + cCadena, "todovisual.txt" )
Muchas gracias experto :D ... me pone al inicio seis CEROS pero solo al inicio, yo lo acomodo :D muchas gracias experto, ahora si puedo trabajar muy bien :D, es un código muy rapido y sencillo nuevamente muchas gracias :D

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

VFP and mysql

Estaba viendo que un usuario tenia un problema para ingresar una imagen y le recomendast un campo meno y después un general y así... ¿Yo tengo un problema algo similar yo utilizando la base de datos de fox genero un campo general e inserto un ole sin...
1 respuesta

Crear un archivo VCS (vCalendar)

Necesito un poco de ayuda con un tema que tiene como loco. Jajajaja Mi nombre es Abel, y tengo la siguiente duda. Alguien sabe la manera de crear archivos *. Vcs para Outlook vía FoxPro El archivo vcs para los que no lo saben es el archivo que puede...
1 respuesta

Cómo extraer archivos de un Campo General en VFP7

Tengo una tabla en la que he incrustado 792 archivos pdf.(Comprobantes correspondientes a los asientos del libro Diario Gral.) Sucede que además del excesivo tamaño del archivo fpt, por motivos que aún no logro determinar no puedo continuar...
1 respuesta

Como insertar foto en tablas de visual fox pro 9

Alguien por favor que me oriente como insertar una foto en visual fox pro de tal manera que al cambiar de registro cambien también las fotos Gracias de antemano
1 respuesta

Macro para ocultar filas en cero

Tengo una tabla dinámica con muchos valores, necesito ocultar una serie de filas cuyo valor sea mayor o menor a 1, son 3 columnas comenzando en la celda "D8" y las 3 deben estar en este rango para ocultarse, aunado a esto, si las 3 columnas tienen...
1 respuesta

Cajón

Tengo una BD en access, ¿Sabes cuál es el comando que me abre el cajón billetero que tengo conectado a una impresora de tikets? Ademas quisiera saber que debo hacer para instalar un lector de código de barras a mi BD.
3 respuestas

Rellenar con 0

Ojala me puedan ayudar, bueno tengo el siguiente problema, necesito rellenar con 0 desde la izquierda, lo he hecho de la siguiente manera =1000000000000000+A1 y luego extraigo. Pero el problema es cuando tengo numeros con decimales. Ejm. Tengo 420 y...
1 respuesta

Impresión de Fox-Dos a Laser

¿Cómo puedo hacer para imprimir desde Foxpro para DOS hacia una impresora Laser?, Si imprimo hacia una matricial puedo configurar los fonts usando el CHR(27)+CHR(33)+ CHR(xx), pero cuando envío hacia una laser o de inyección de tinta la impresora no...
1 respuesta