Page 114 - 6735

docNode.appendChild xmldoc.createTextNode("hello")
'додати дочірній текстовий вузол

Dim s As Variant
Set node = docNode.ChildNodes.Item(0) 'дочірній вузол
з індексом 0 (перший)
s = node.nodeName 'ім'я вузла
s = node.NodeType 'тип вузла
s = node.NodeValue 'текстове значення вузла
s = node.HasChildNodes 'чи вузол має дочірні вузли
s = node.Text '*текстовий вміст вузла і підвузлів
s = node.XML '*XML вузла і підвузлів
s = node.DataType '*тип даних вузла
s = node.parsed '*перевіряє чи вузол і підвузли
проаналізовані
s = node.ParentNode.nodeName 'ім'я батьківського вузла
s = node.NextSibling.nodeName 'ім'я наступного
спорідненого вузла
s = node.ChildNodes.Item(0).nodeName 'ім'я дочірнього
вузла з індексом 0
s = node.Attributes.Length 'кількість атрибутів вузла
s = node.Attributes.Item(0).NodeValue 'текстове
значення атрибута з індексом 0
s = node.Attributes.Item(0).specified '*чи заданий
явно, чи за замовчуванням
s = docNode.ChildNodes.Item(0).OwnerDocument.nodeName
'ім'я кореня документа

s = xmldoc.getElementsByTagName("el2").Length
'кількість елементів із тегом el2
Set el = xmldoc.getElementsByTagName("el2").Item(0)
'перший елемент із тегом el2
s = el.nodeName 'ім'я вузла
s = el.tagName 'ім'я тега
s = el.GetAttribute("atr1") 'значення атрибута atr1
el.setAttributeNode xmldoc.createAttribute("Data")

114