none
Recorrer Datatable para vaciar en TXT RRS feed

  • Pregunta

  • Buen día compañeros

    Estoy realizando una consulta a SQL server en la cual me trae varios datos de los cuales tengo que separar por medio del símbolo "|" (Barra Vertical) entonces, hago la consulta y quiero empezar a recorrer el DataTable para empezar a escribir en el txt pero no se como recorrer el datatable:

    Ej 

    la consulta trae mas o menos esto:

    Nombre        Apellido      Domicilio      Telefono     Vehiculo

    Pedro           Martínez         México         555555       Honda

    Entonces al vaciar en el txt debe quedar

    Pedro|Perez|México|55555|Honda

    ¿Como puedo recorrer el DataTable?

    Gracias de antemano 


    Chinoafro

    jueves, 9 de agosto de 2018 22:06

Respuestas

  • Hola:

    Para recorrer un datatable

    For Each Fila As DataRow In TU_DATATABLE.Rows
        'El valor de una columna llamada id sera
        Fila.Item("id"))
    Next

    Un saludo desde Bilbo
    Carlos
    • Propuesto como respuesta Pablo Rubio viernes, 10 de agosto de 2018 14:49
    • Marcado como respuesta chinoafro lunes, 13 de agosto de 2018 0:49
    viernes, 10 de agosto de 2018 11:31
  • Hola chinoafro,

    Otra manera sería utilizar la propiedad ItemArray del DataRow para obtener una matriz de los valores de cada columna y almacenarlas.

    Dim contenido As String() = MiDataTable.Rows.OfType(Of DataRow).
                                            Select(Function(r) String.Join("|", r.ItemArray())).ToArray()
    
    Dim ruta As String = "AlgunaRuta/.../.../example.txt"
    
    File.WriteAllLines(ruta, contenido)  'Creas el archivo con el contenido

    Saludos.


    JC NaupaCrispín
    Lima - Perú

    La magia no existe, la programación SI

    • Propuesto como respuesta Pedro Ávila sábado, 11 de agosto de 2018 12:03
    • Marcado como respuesta Pablo Rubio lunes, 13 de agosto de 2018 16:56
    viernes, 10 de agosto de 2018 23:48

Todas las respuestas

  • Hola:

    Para recorrer un datatable

    For Each Fila As DataRow In TU_DATATABLE.Rows
        'El valor de una columna llamada id sera
        Fila.Item("id"))
    Next

    Un saludo desde Bilbo
    Carlos
    • Propuesto como respuesta Pablo Rubio viernes, 10 de agosto de 2018 14:49
    • Marcado como respuesta chinoafro lunes, 13 de agosto de 2018 0:49
    viernes, 10 de agosto de 2018 11:31
  • Hola chinoafro,

    Otra manera sería utilizar la propiedad ItemArray del DataRow para obtener una matriz de los valores de cada columna y almacenarlas.

    Dim contenido As String() = MiDataTable.Rows.OfType(Of DataRow).
                                            Select(Function(r) String.Join("|", r.ItemArray())).ToArray()
    
    Dim ruta As String = "AlgunaRuta/.../.../example.txt"
    
    File.WriteAllLines(ruta, contenido)  'Creas el archivo con el contenido

    Saludos.


    JC NaupaCrispín
    Lima - Perú

    La magia no existe, la programación SI

    • Propuesto como respuesta Pedro Ávila sábado, 11 de agosto de 2018 12:03
    • Marcado como respuesta Pablo Rubio lunes, 13 de agosto de 2018 16:56
    viernes, 10 de agosto de 2018 23:48