Visual Basic.NET - Buscar Caracter Determinado

 
Vista:

Buscar Caracter Determinado

Publicado por Antonio (1 intervención) el 17/11/2010 10:23:39
Buenos dias. Soy nuevo en la programación y no tengo ni idea de visual. Haber si los expertos pueden echarme una mano.

Necesito buscar en un fichero de texto de forma que si el 3er caracter de cada línea es una "#" coja toda la línea y la guarde en un fichero nuevo. Estoy intentando indagar en san google pero tengo demasiada poca idea para hacerlo, me haría falta esto para empezar.

Un saludo y gracias por vuestro tiempo de antemano.

PD: Se que hay que crear un streamwriter y un filestream pero soy nulo y estoy mu perdio. Aquí os dejo mi codigo aunque da bastante pena por que no se hacerlo.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim linea As String
Dim ofichero As FileStream
Dim oescritor As StreamWriter
Dim SearchString As String = "C:\01\001_130710_D_T_00_01\001_130710_D_T_00_01.013.txt"
ofichero = New FileStream("c:/prueba.txt", TestPos = InStr(3, SearchString, "#")
while testpos = "#"

FileMode.Append, FileAccess.Write)
fileclose()
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de roger

RE:Buscar Caracter Determinado

Publicado por roger (186 intervenciones) el 17/11/2010 13:22:29
puedes probar con algo como esto

Dim linea As String = String.Empty
Dim lector As New StreamReader("RutaArchivo")
Dim escritor = New StreamWriter("RutaArchivoNuevo")
linea = lector.ReadLine()
While (linea <> String.Empty)
If (linea.Substring(2, 1) = "#") Then
escritor.WriteLine(linea)
End If
linea = lector.ReadLine()
End While
escritor.Flush()
escritor.Dispose()
lector.Dispose()

Nota: no lo he depurado, disculpa si hay algun error, nos comentas

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar