Visual Basic.NET - extraer informacion de txt

   
Vista:

extraer informacion de txt

Publicado por alexis (35 intervenciones) el 24/10/2014 16:02:24
buenos dias que tal, presento el siguiente problema llevo dias intentando extraer esta informacion si me podrian dar una guia

tengo en un archivo txt la siguiente información

[headings]|shipment_nbr|facility_code|company_code
[H1]|SNO0000002905|PA1|ASSA
[headings]|seq_nbr|action_code|lpn_nbr
[H2]|1|CREATE|01
[H2]|2|CREATE|02
[H2]|3|CREATE|03
[H2]|4|CREATE|04
[H2]|5|CREATE|05


la cual deseo almacenar la informaicon de H1 en una tabla y la de H2 en otra tabla
la h1 siempre sera una fila

la h2 pueden variar la cantidad de filas


como podria leer el txt para luego poder obtener la informacion a insertar en las tablas
se le agradece la ayuda
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 giancarlo

extraer informacion de txt

Publicado por giancarlo (280 intervenciones) el 24/10/2014 16:21:07
puedes usar streamreader para leer archivos de texto

1
2
3
4
5
6
7
8
9
10
11
Dim lista As New List(Of String)
        If IO.File.Exists(archivo) Then
            Dim sreader As New IO.StreamReader(archivo, System.Text.Encoding.Default)
            Dim fila As String = sreader.ReadLine 'lee la primera linea
 
            While fila IsNot Nothing'seguira leendo siempre en cuando exista una linea por leer
                lista.Add(fila.ToString.Trim(""""))
                fila = sreader.ReadLine
            End While
            sreader.Close()
        End If

para separar las columnas, puedes usar la funcion split
dim separado() as string=lineaTexto.split("|")
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

extraer informacion de txt

Publicado por alexis (35 intervenciones) el 24/10/2014 18:44:48
buen dia gracias realizare las pruebas
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