Saltar al contenido principal

 none
Como saber el Itms de un nodo RRS feed

Respuestas

  • Hola amigo, no te respondo porque es que nunca trabajé con nodos, si se llega a ellos como string y el item forma parte  "escrita" de la cadena podrías recorrerlos mediante for .. para luego palicar una sentencia ej:

    for..........

      Dim i As Integer = InStr("NodoEnString", "NombreDelItem", CompareMethod.Text)
            If Not i = 0 Then
                MessageBox.Show("El indice del nodo es: " &  i)
                Exit For
            End If

    next.....

    Suponiendo que con el idice del nodo te alcance para lo que necesitas.

     Pero es solo supocición ya te digo nunca trabaje con nodos

    Saludos


    ARA San Juan 44 HEROES     ‗‗‗‗­|||||‗‗‗‗‗ pfannkuche2000@yahoo.com.ar

    • Marcado como respuesta Diablo_Rojo viernes, 15 de noviembre de 2019 16:55
    jueves, 14 de noviembre de 2019 22:18

Todas las respuestas

  • Hola amigo, no te respondo porque es que nunca trabajé con nodos, si se llega a ellos como string y el item forma parte  "escrita" de la cadena podrías recorrerlos mediante for .. para luego palicar una sentencia ej:

    for..........

      Dim i As Integer = InStr("NodoEnString", "NombreDelItem", CompareMethod.Text)
            If Not i = 0 Then
                MessageBox.Show("El indice del nodo es: " &  i)
                Exit For
            End If

    next.....

    Suponiendo que con el idice del nodo te alcance para lo que necesitas.

     Pero es solo supocición ya te digo nunca trabaje con nodos

    Saludos


    ARA San Juan 44 HEROES     ‗‗‗‗­|||||‗‗‗‗‗ pfannkuche2000@yahoo.com.ar

    • Marcado como respuesta Diablo_Rojo viernes, 15 de noviembre de 2019 16:55
    jueves, 14 de noviembre de 2019 22:18
  • Lo primero gracias por responder Marcelo

    Lo he solucionado de esta manera que es parecido a tu ejemplo por que no consigo sacar los itme  del nodo (numero) correspondiente al mismo 

    este es el codigo

     Dim x As Integer = 0
                For Each node As Xml.XmlNode In Inicio.XmlNodeList_Cervezas
                    If x = Inicio.DataGridView1.CurrentRow.Index And node.ChildNodes.Item(0).InnerText = TextBox1.Text Then
                        Dim col2 As Color = Inicio.DataGridView1.CurrentRow.Cells(18).Style.BackColor
                        node.ChildNodes(0).InnerText = Inicio.DataGridView1.CurrentRow.Cells(0).Value 'NOMBRE
                        node.ChildNodes(1).InnerText = Inicio.DataGridView1.CurrentRow.Cells(1).Value 'ELABORACION
                        node.ChildNodes(2).InnerText = Inicio.DataGridView1.CurrentRow.Cells(2).Value 'ESTILO
                        node.ChildNodes(3).InnerText = Inicio.DataGridView1.CurrentRow.Cells(3).Value 'TIPO
                        node.ChildNodes(4).InnerText = Inicio.DataGridView1.CurrentRow.Cells(4).Value 'DI
                        node.ChildNodes(5).InnerText = Inicio.DataGridView1.CurrentRow.Cells(5).Value 'DF
                        node.ChildNodes(6).InnerText = Inicio.DataGridView1.CurrentRow.Cells(6).Value 'ATENUACION
                        node.ChildNodes(7).InnerText = Inicio.DataGridView1.CurrentRow.Cells(7).Value 'GADUACION
                        node.ChildNodes(8).InnerText = Inicio.DataGridView1.CurrentRow.Cells(8).Value 'COLOR
                        node.ChildNodes(9).InnerText = Inicio.DataGridView1.CurrentRow.Cells(9).Value 'EMBOTELLADO
                        node.ChildNodes(10).InnerText = Inicio.DataGridView1.CurrentRow.Cells(10).Value 'MADURACION
                        node.ChildNodes(11).InnerText = Inicio.DataGridView1.CurrentRow.Cells(11).Value 'HERVIDO
                        node.ChildNodes(12).InnerText = Inicio.DataGridView1.CurrentRow.Cells(12).Value 'INICI FERMENTACION
                        node.ChildNodes(13).InnerText = Inicio.DataGridView1.CurrentRow.Cells(13).Value 'FIN FERMENTACION
                        node.ChildNodes(14).InnerText = Inicio.DataGridView1.CurrentRow.Cells(14).Value 'INICIO SECUNDARIO
                        node.ChildNodes(15).InnerText = Inicio.DataGridView1.CurrentRow.Cells(15).Value 'FIN SECUNDARIO
                        node.ChildNodes(16).InnerText = Inicio.DataGridView1.CurrentRow.Cells(16).Value 'INCIO DRYHOP
                        node.ChildNodes(17).InnerText = Inicio.DataGridView1.CurrentRow.Cells(17).Value 'FIN DRYHOP
                        node.ChildNodes(18).InnerText = String.Format("{0}, {1}, {2}", col2.R, col2.G, col2.B) 'COLOR RGB
                    End If
                    x = x + 1
                Next
                Inicio.XmlDocument_Cervezas.Save("DATOS\Cervezas.xml")

     

    viernes, 15 de noviembre de 2019 8:51