当前位置:编程学习 > C#/ASP.NET >>

XML读取的问题

现在有一程序工作原理如下,根据数据库你的path值来取得xml里面的特定值。(xml文件如示例)
例如:

path: settlCodes>settlcode>name
则可拿到sapCenter.

请问如何读取相同的标记名的不同值?比如同时要取得GGLNarrative payMethod_1 BKT payMethod_2? path如何写?

xml示例:
<settlCodes><settlcode><name>sapCenter</name><value>0I953</value></settlcode><settlcode><name>GGLNarrative</name><value> </value></settlcode><settlcode><name>payMethod_1</name><value>BKT</value></settlcode><settlcode><name>payMethod_2</name><value> </value></settlcode></settlCodes>


ps:顺便给出当前的源码,如果有高人能够指点怎么改


  For Each objSSTSMQColDet In objColumnList

            m_node = firstNode

            If Not objSSTSMQColDet.ColName.ToUpper = "[OTHERTABLE]" Then
                strSQL &= objSSTSMQColDet.ColName & ", "
            End If

            Dim NoPathFound As Boolean = False

            Try
                cannotFind = True
                isFirstNode = True
                i = 0
                For Each objColumn In objSSTSMQColDet.XMLPath.Split(">"c)

                    For Each m_child In m_node.ChildNodes
                        If m_child.Name.ToUpper = objColumn.ToUpper Then
                            If isFirstNode Then
                                If NoOfLoop = i Then
                                    m_node = m_child
                                    isFirstNode = False
                                    cannotFind = False
                                    i = 0
                                    Exit For

                                End If
                                i += 1

                            Else
                                m_node = m_child
                                cannotFind = False
                                Exit For
                            End If


                        End If
                    Next

                    If cannotFind Then
                        If NoOfLoop = 0 Then
                            objMQLog.WriteEventLog("Warning : XML Path : '" & objSSTSMQColDet.XMLPath & "' in table SSTS_MQCOL_DET not found for field : " & objColumn)
                        End If
                        NoPathFound = True
                        Exit For
                    Else
                        cannotFind = True
                    End If
                Next

                If Not objSSTSMQColDet.ColName.ToUpper = "[OTHERTABLE]" Then
                    If NoPathFound Then
                        strValue &= "'', "
                    Else
                        strValue &= "'" & m_node.InnerText & "', "

                    End If
                Else
                    If Not NoPathFound Then
                        Dim objColumnList1 As ArrayList = objDBMQSSTSMQColDet.getRecordByRefID(objSSTSMQColDet.ID)
                        InsertToTable(m_node, objColumnList1)
                    End If
                End If

                NoPathFound = False


多谢。 --------------------编程问答-------------------- 同为XML烦恼 --------------------编程问答-------------------- 啊,是啊……如果每一个tag是唯一的,path就能写出来,就好办的多了……如果又哪位高人知道,还希望不吝指导。

谢谢。 --------------------编程问答-------------------- 2008-11最近写一个程序:treeview listview结合使用,导出数据xml文件。 
程序界面: 
http://album.hi.csdn.net/app_uploads/linjimu/20081128/171243021.png


还有我的资料里面有也xml的读取文章,可以下载去看看。

另外也BS一下零分贴。
--------------------编程问答-------------------- 大哥,不是我不愿意给分……是我没分……有分早散了。 --------------------编程问答-------------------- 呵呵。上面那个程序可以导出收藏夹为xml文件。导入时,可以选择你导出的xml文件。如下图,程序读取xml这个文件,导入到系统收藏夹里面:创建文件夹,写入网站的site和url为 xxx.url文件


  
————————————————————————
简简单单,平平安安,朴朴素素,快快乐乐。
补充:.NET技术 ,  VB.NET
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,