XMLDOMを使用してXML objの終了タグを配列に格納

Question

現在、VBScriptのXMLDOMオブジェクトを使用して、XMLファイルの各ノードを取得します。タグと値を返します。ただし、終了タグも返すようにしたいと思います。

私の最終目標は、配列とフォーマットをJSONに取り入れることです。親ノードにXMLの別の親ノードが含まれている可能性があるため、}をJSON形式で閉じるタグをいつ追加するのかを知ることが難しいため、これはまだ困難でした。

現在のコード：

再び

Set xmlDoc = CreateObject("Microsoft.XMLDOM") 
xmlDoc.Async = "False" 
xmlDoc.Load(datatable("Filelocation", varSheet) & datatable("TC_Name", varSheet)) 
Set colNodes = xmlDoc.SelectNodes ("//") 
For Each objNode In colNodes 
    'MsgBox objNode.NodeName & " " & objNode.NodeValue 
    value = objNode.NodeName 
    MsgBox value 
Next 

、私は終了タグのvalue何も返されません確認してください。これはXMLDOMを使って可能ですか？そうでない場合は、VBScriptでXMLをJSONに変換する別の方法がありますか？

Answer 1

XMLとJSONはどちらも階層的なデータ構造です。それらの間の変換のためには、通常、再帰的データ構造を横断し、このようなノードを処理したい：

1. は「オープンノード」情報（例えば{ "nodename":）
2. 書き込みテキスト本文を書くか、ネストされたノードに再帰します。
3. 「クローズノード」情報を書き込みます（例：}）。

任意のXMLデータでは1つのループでは不十分です。