¿Recorrer Archivo de texto?
Como recorro un achivo txt o html buscado una cadena de texto. Y a partir de la posición encontrada, que me extraiga un string 'x'.
¿Cómo recorro a partir de una posición 'x' el archivo?
Desde Visual Basic
¿Cómo recorro a partir de una posición 'x' el archivo?
Desde Visual Basic
1 Respuesta
Respuesta de abj2005
1
1: Necesitas agregar atu proyecto una referencia a la librería " Microsoft Scripting Library".
2:Después prueba con este código.
Sub BarrerArchivo()
Dim Fso As New FileSystemObject,ts As TextStream
Dim strArchivo As String, strLinea As String
strArchivo = "C:\Archivo.txt"
Set ts = Fso.OpenTextFile(strArchivo, ForReading, False)
Do Until ts.AtEndOfStream
strLinea = ts.ReadLine
Loop
End Sub
2:Después prueba con este código.
Sub BarrerArchivo()
Dim Fso As New FileSystemObject,ts As TextStream
Dim strArchivo As String, strLinea As String
strArchivo = "C:\Archivo.txt"
Set ts = Fso.OpenTextFile(strArchivo, ForReading, False)
Do Until ts.AtEndOfStream
strLinea = ts.ReadLine
Loop
End Sub
