XMLから情報を取得するには？ (ID:90273)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ご返事ありがとうございます。 おかげさまで以下のようにして情報を取得できました。 'XMLファイルから情報取得 Public Sub GetXMLINFO() 'XML定義 Dim xmlDoc As MSXML.DOMDocument Dim xmlEle As MSXML.IXMLDOMElement Dim strBase As String Dim strValue As String Dim Num01, Num02, i, j As Integer Dim xmlNode As MSXML.IXMLDOMNode Set xmlDoc = New MSXML.DOMDocument xmlDoc.Load ("D:\TEST.xml") Set xmlEle = xmlDoc.documentElement strBase = xmlEle.baseName Num01 = xmlEle.childNodes.length For i = 0 To Num01 - 1 If xmlEle.childNodes.Item(i).baseName = "BUMONCD" Then strValue = xmlEle.childNodes.Item(i).childNodes._ Item(0).nodeTypedValue Exit For End If Next End Sub ありがとうございました。