Handling namespaces in XML...

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • Christmas
    New Member
    • Aug 2012
    • 2

    Handling namespaces in XML...

    I think I understand using XMLnamespaceman ager but I don't have a handle on what I'm doing wrong.

    Here is a XML snippet.
    Code:
    <?xml version="1.0" encoding="UTF-8" standalone="yes" ?> 
    - <NewDataSet xmlns="http://www.inc.com.sc/MF_File">
    - <MF_File xmlns="http://www.inc.com.sc/MF_File" version="1.0">
      <MFFileID>File12345</MFFileID> 
      <FileType>MF</FileType> 
      <FileDateTime>2012-07-19T16:58:18.210-04:00</FileDateTime> 
      <JobControlNumber>ABVDREG_12</JobControlNumber> 
      <TotalPackages>1</TotalPackages> 
      <PrintCompleteDateTime>2012-07-19T17:58:18.210-04:00</PrintCompleteDateTime> 
      <InsertCompleteDateTime>2012-07-19T18:58:18.210-04:00</InsertCompleteDateTime> 
      <SortCompleteDateTime>2012-07-19T19:00:18.210-04:00</SortCompleteDateTime> 
    - <Batch>
      <PrintFileName>PrintFile1</PrintFileName> 
    - <Package>
      <CustomerPackageKey>00000000000002</CustomerPackageKey> 
      <IncepturePackageKey>ABCD100X000001Q</IncepturePackageKey> 
      <DispositionId>5</DispositionId> 
      <DispositionDescription>Insert Successful</DispositionDescription> 
      </Package>
    Here is my code:
    Code:
    Dim mf_xmld As New XmlDocument()
    Dim mf_nodelist As XmlNodeList
    Dim mf_node As XmlNode = mf_xmld.DocumentElement
    
    'Create the XML Document
    mf_xmld = New XmlDocument()
    
    'Load the Xml file
     mf_xmld.Load("C:\testxml.xml")
    Dim xmlnsManager As New XmlNamespaceManager(mf_xmld.NameTable)
    xmlnsManager.AddNamespace("nds", "http://www.inc.com.sc/MF_File")
    
    'Get the list of name nodes 
    mf_nodelist = mf_xmld.SelectNodes("nds:NewDataSet/nds:MF_FIle/nds:Batch/nds:Package", xmlnsManager)
    'mf_nodelist = mf_xmld.ChildNodes
    'Loop through the nodes
    For Each mf_node In mf_nodelist
      Dim customerpackagekeyvalue = mf_node.ChildNodes.Item(0).InnerText
      Dim incepturepackagekeyvalue = mf_node.ChildNodes.Item(1).InnerText
      Dim dispositionIdvalue = mf_node.ChildNodes.Item(2).InnerText
      Dim DispositionDescriptionvalue = mf_node.ChildNodes.Item(3).InnerText
    I am very new to XML so forgive any obvious flaws and thanks in advance for your help.

    Christmas
    Last edited by Frinavale; Aug 2 '12, 02:15 PM. Reason: Added code tags.
  • Christmas
    New Member
    • Aug 2012
    • 2

    #2
    I have this figured out.

    Comment

    Working...