菜菜问题，Re者有分——这样一个Node怎么做的？——19.8

[AlexXXX]

我怎么取？
我是想传输一个价格，并传输价格的类型。

[AlexXXX]

XXXgz

[amorg]

msxml解释器中节点有getattribute函数和text属性
用来提取节点属性和文本

[brian_zhuang]

Dim oDOM As DOMDocument
Dim oElem As IXMLDOMElement

Set oDOM = New DOMDocument
Set oElem = oDOM.createElement("Price")
oElem.setAttribute "type", "double"
oElem.Text = 1.98
oDOM.appendChild oElem
oDOM.save "d:\temp.xml"

Set oDOM = Nothing
Set oElem = Nothing

[三杯倒]

1111