VBScript
VBScript
UpdateChildContent using a Tag Path
See more XML Examples
Demonstrates updating the content of a node using UpdateChildContent with a tag path.Chilkat VBScript Downloads
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
set xml = CreateObject("Chilkat.Xml")
xml.Tag = "world"
xml.NewChild2 "north_america|united_states|california|sacremento","capital"
xml.NewChild2 "north_america|united_states|california|los_angeles","City of Angels"
xml.NewChild2 "north_america|united_states|california|san_francisco","Silicon Valley"
xml.NewChild2 "north_america|united_states|california|san_diego","Birthplace of California"
xml.NewChild2 "north_america|united_states|illinois|chicago","Windy City"
outFile.WriteLine(xml.GetXml())
' Produces the following XML
'
' <?xml version="1.0" encoding="utf-8" ?>
' <world>
' <north_america>
' <united_states>
' <california>
' <sacremento>capital</sacremento>
' <los_angeles>City of Angels</los_angeles>
' <san_francisco>Silicon Valley</san_francisco>
' <san_diego>Birthplace of California</san_diego>
' </california>
' <illinois>
' <chicago>Windy City</chicago>
' </illinois>
' </united_states>
' </north_america>
' </world>
'
xml.UpdateChildContent "north_america|united_states|california|san_diego","Mild Climate"
' An alternative way of doing it:
success = xml.FindChild2("north_america|united_states|california")
xml.UpdateChildContent "san_francisco","Golden Gate Bridge"
xml.GetRoot2
outFile.WriteLine(xml.GetXml())
' The XML now contains:
' <?xml version="1.0" encoding="utf-8" ?>
' <world>
' <north_america>
' <united_states>
' <california>
' <sacremento>capital</sacremento>
' <los_angeles>City of Angels</los_angeles>
' <san_francisco>Golden Gate Bridge</san_francisco>
' <san_diego>Mild Climate</san_diego>
' </california>
' <illinois>
' <chicago>Windy City</chicago>
' </illinois>
' </united_states>
' </north_america>
' </world>
outFile.Close