(Xojo Plugin) Insert after Node with Tag

Demonstrates how to insert a new node as a sibling directly after a specified node having a given tag.

Note: This example requires Chilkat v9.5.0.76 or greater. The TagIndex method was introduced in v9.5.0.76

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

// First, let's create the following XML:

//   <FatturaElettronicaHeader>
//     <DatiTrasmissione>
//       <IdTrasmittente>
//         <IdPaese>IT</IdPaese>
//         <IdCodice>12345678</IdCodice>
//       </IdTrasmittente>
//     </DatiTrasmissione>
//   </FatturaElettronicaHeader>

Dim xml As New Chilkat.Xml
xml.Tag = "FatturaElettronicaHeader"
xml.UpdateChildContent "DatiTrasmissione|IdTrasmittente|IdPaese","IT"
xml.UpdateChildContent "DatiTrasmissione|IdTrasmittente|IdCodice","12345678"

// Now insert a new node to get this XML:

//   <FatturaElettronicaHeader>
//     <DatiTrasmissione>
//       <IdTrasmittente>
//         <IdPaese>IT</IdPaese>
//         <NewTag>Content</NewTag>
//         <IdCodice>12345678</IdCodice>
//       </IdTrasmittente>
//     </DatiTrasmissione>
//   </FatturaElettronicaHeader>

Dim xT As Chilkat.Xml
xT = xml.FindChild("DatiTrasmissione|IdTrasmittente")
Dim index As Int32
index = xT.TagIndex("IdPaese")
If (index < 0) Then
    System.DebugLog("nothing found at the given tag.")
    Return
End If

Dim x1 As Chilkat.Xml
x1 = xT.NewChildAfter(index,"NewTag","Content")

// Show the resulting XML.
System.DebugLog(xml.GetXml())