Tema: FAQ's de VB6
Ver Mensaje Individual
  #177 (permalink)  
Antiguo 23/09/2008, 12:59
Avatar de David
David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 19 años, 8 meses
Puntos: 839
De acuerdo Leer y escribir archivos

Esta pregunta ha sido tratada muchas veces con diferentes matices y me extraña que aún no estuviera entre las preguntas frecuentes.

Leer un archivo de texto plano:
Código vb:
Ver original
  1. Dim Linea As String
  2. Open "Archivo.txt" For Input As #1 'Abrimos el archivo en modo lectura
  3. Do While Not EOF(1) 'Recorremos todas las líneas hasta el final del archivo
  4.    Line Input #1, Linea 'Leemos la sgte. línea y almacenamos en "Linea"
  5.    'Aquí se puede trabajar con la línea
  6. Loop
  7. Close #1 'Cerramos el archivo
Escribir en un archivo de texto plano:
Código vb:
Ver original
  1. Open "Archivo.txt" For Output As #1 'Abrimos el archivo en modo escritura
  2. Print #1, "Primera Línea"
  3. Print #1, "Segunda Línea"
  4. Close #1 'Cerramos el archivo
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.