Jospin
21 de Noviembre del 2003

Hola. Necesito saber una forma de como leer determinadas lineas de un archivo txt. Por ejemplo, abrir el archivo. Leer la linea 10 y 14 y cerrar. Gracias a tos

sdemingo
21 de Noviembre del 2003

Hola,

Dim linea As String
dim fila as integer

fila = 1
Open "c:Archivo.txt" For Input As #1
Do While Not EOF(1)
if fila = 10 or fila = 14 then
Input #1, linea
msgbox linea
end if
fila = fila + 1
Loop
Close #1


Un saludo
sdemingo

Baltasar
21 de Noviembre del 2003

sdemingo, se te ha escapao!

Dim linea As String
dim fila as integer

fila = 1
Open "c:Archivo.txt" For Input As #1
Do While Not EOF(1)
Input #1, linea
if fila = 10 or fila = 14 then
msgbox linea
end if
fila = fila + 1
Loop
Close #1

pusiste el input dentro del if. siempre leería la fila 1 y la 2.

sdemingo
21 de Noviembre del 2003

ok, gracias por la apreciación