如何使用ActiveState'；s dom包

在TCL中，如果使用DOM包（ActiveState发行版中提供），则可以创建xml

set xmlDoc [::dom::create]
set root [::dom::document createElement $xmlDoc "trafficStatistics"]

set statElement [::dom::document createElement $root "Tx_Frames"]
::dom::element setAttribute $statElement "type" "numericlist"
::dom::element setAttribute $statElement "displayName" "Tx Frames"

puts [::dom::serialize $xmlDoc -indent true]

创建这个简单的xml：

<result>
    <trafficStatistics type="structure">
        <Tx_Frames type="numericlist" displayName="Tx Frames"></Tx_Frames>
    </trafficStatistics>
</result>

如何向Tx_Frames元素添加一些数据

<Tx_Frames type="numericlist" displayName="Tx Frames">some data</Tx_Frames>

一些数据

---

注意，dom包实际上是libxml2上的包装器，我相信您需要

：：dom:：document createTextNode

命令。例如：

::dom::document createTextNode $statElement "some data"

将此命令添加到示例脚本时：

set xmlDoc [::dom::create]
set root [::dom::document createElement $xmlDoc "trafficStatistics"]

set statElement [::dom::document createElement $root "Tx_Frames"]
::dom::element setAttribute $statElement "type" "numericlist"
::dom::element setAttribute $statElement "displayName" "Tx Frames"
::dom::document createTextNode $statElement "some data"

它生成以下XML：

<trafficStatistics>
  <Tx_Frames type="numericlist" displayName="Tx Frames">some data</Tx_Frames>
</trafficStatistics>

一些数据

您可以在此处找到dom包的文档：

希望有帮助

---

Eric Melski

我相信您需要

：：dom:：document createTextNode

命令。例如：

::dom::document createTextNode $statElement "some data"

将此命令添加到示例脚本时：

set xmlDoc [::dom::create]
set root [::dom::document createElement $xmlDoc "trafficStatistics"]

set statElement [::dom::document createElement $root "Tx_Frames"]
::dom::element setAttribute $statElement "type" "numericlist"
::dom::element setAttribute $statElement "displayName" "Tx Frames"
::dom::document createTextNode $statElement "some data"

它生成以下XML：

<trafficStatistics>
  <Tx_Frames type="numericlist" displayName="Tx Frames">some data</Tx_Frames>
</trafficStatistics>

一些数据

您可以在此处找到dom包的文档：

希望有帮助

埃里克·梅尔斯基