Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/06/2008, 11:40
german_martin
 
Fecha de Ingreso: septiembre-2006
Ubicación: Buenos Aires
Mensajes: 132
Antigüedad: 17 años, 8 meses
Puntos: 0
Leer una linea completa de un archivo de texto

Estimados,
Actualmente estoy haciendo una aplicacion en VB.2005 que busca en unos archivos txt la palabra error. Pero lo que yo necesito es que me devuelva la linea completa donde esta la palabra error, tambien (si se puede) que me devuelva la linea anterior y posteror.

Muchas gracias!!


Por las dudas les dejo mi humilde codigo:

Try
'Lo siguiente Busca en un directorio archivos que contengan una cadena de texto determinada


Dim Archivo As System.Collections.ObjectModel.ReadOnlyCollection( Of String)
' busca "Error" en un solo nivel ( SearchTopLevelOnly ) en el directorio c:
Archivo = My.Computer.FileSystem.FindInFiles( _
"C:\Utiles\LOGS", _
"Error", _
True, _
FileIO.SearchOption.SearchTopLevelOnly)
' recorre la lista
For Each name As String In Archivo
' Agrega
ListBox1.Items.Add(name)
Next
' error
Catch oe As Exception
MsgBox(oe.Message, MsgBoxStyle.Critical)
End Try