人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

【VB6のXML書込みについて質問】

XMLの書込み処理を以下のように作成しました。
目的は<test>タグ以下に<ITEM>タグを二つ作成することなのですが、
私が作成したコードでは、<ITEM>タグが一つしか作成されません。
(どうやら1回目の書込みを2回目で上書きしてしまっているようです。)

<test>タグ以下に<ITEM>タグを二つ作成する方法についてアドバイス
ください。宜しくお願いします。


[作成したコード]

Dim setting As MSXML2.IXMLDOMElement
Dim xmlDoc As MSXML2.DOMDocument
Dim currentNode As IXMLDOMNode

xmlDoc.Load("ファイルパス")

currentNode =xmlDoc.SelectSingleNode("アイテム追加先")


Set setting =xmlDoc.createNode(MSXML2.NODE_ELEMENT,"ITEM")'新規アイテム

currentNode.appendChild setting '一回目
currentNode.appendChild setting '二回目


[実行前XML]
<test>
</test>

[実行後XML]
<test>
<ITEM/>
</test>

●質問者: harunoharuno
●カテゴリ:コンピュータ インターネット
✍キーワード:as SET vb6 XML アイテム
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● y-kawaz
●200ポイント ベストアンサー

同じsettingを2度appendChildしてるからだと思います。2つ追加したい場合は2つそれぞれをcreateNodeしてください。

currentNode =xmlDoc.SelectSingleNode("アイテム追加先")
Set setting1 =xmlDoc.createNode(MSXML2.NODE_ELEMENT,"ITEM")'新規アイテム
Set setting2 =xmlDoc.createNode(MSXML2.NODE_ELEMENT,"ITEM")'新規アイテム
currentNode.appendChild setting1 '一回目
currentNode.appendChild setting2 '二回目

http://q.hatena.ne.jp/answer

◎質問者からの返答

回答有難う御座います。早速ためしてみます。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ