SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: giomar en Jueves 16 de Febrero de 2006, 10:01

Título: Trabajar Con Archivos Txt
Publicado por: giomar en Jueves 16 de Febrero de 2006, 10:01
Hola amigos de solocodigo, mi pregunta esta vez se trata de como puedo manipular un archivo TXT desde VB, osea, crear, insertar texto por filas, guardar, etc.

Si alguien sabe donde puedo encontrar esa informacion se lo agradeceria muchisimo.

Gracias por todos los aportes.
Título: Re: Trabajar Con Archivos Txt
Publicado por: Jose Arriagada en Jueves 16 de Febrero de 2006, 14:23
Debes tener claro que el trabajar con archivo .TXT son de acceso secuencial, por ende, dependiendo de lo que desees hacer lo que te indico lo podras adaptar para tu necesidad.

** Para escribir en archivo FORMA1
** Este tipo de apertura, genera un archivo nuevo siempre. Por lo que, si existe
** previamente una version del mismo, lo pisa, perdiendose el anterior.
'Obtener numero de secuencia de archivo disponible
NroArch = FreeFile
'Abrir el archivo
Open <NombreArchivo> for output as #NroArch
'Escribir en el archivo
Print #NroArch, <Dato1>,<Dato2>,... <Daton>
'Cerrar archivo
Close(NroArch)

** Para escribir en archivo FORMA2
** Este tipo de apertura, escribe al final del archivo. Por lo que, si existe el archivo
** lo que se escriba, lo realiza al final de este.
** Esta forma de apertura, es ideal para generar LOG de transacciones, donde
** vas registrando eventos de tus procesos, o realizar seguimientos a programas
'Obtener numero de secuencia de archivo disponible
NroArch = FreeFile
'Abrir el archivo
Open <NombreArchivo> For Append Access Write As #NroArch
'Escribir en el archivo
Print #NroArch, <Dato1>,<Dato2>,... <Daton>
'Cerrar archivo
Close(NroArch)

** Para leer desde un archivo
'Obtener numero de secuencia de archivo disponible
NroArch = FreeFile
'Abrir el archivo
Open <NombreArchivo> for input as #NroArch
'Leere registro desde archivo
Input #NroArch, <Var1>, <Var2>,<Var3>
'Cerrar archivo
Close(NroArch)