0

Visual Basic で xml ファイルを操作することを考えています。DOMDOCUMENT Visual Basic を使用して試したところ、エラーが表示されました。domdocument が何であるかを認識していません。ライブラリを機能させるには、ライブラリを呼び出す必要がありますか。私のコードを見てください

Attribute VB_Name = "Module1"
Function getDistance(Origin As String, Destination As String) As Double
    Dim HttpReq As Object
    Dim myDomDoc As DOMDocument60
    Dim distanceNode As IXMLDOMNode
    Set HttpReq = CreateObject("MSXML2.XMLHTTP")
    HttpReq.Open "GET", "http://maps.googleapis.com/maps/api/distancematrix/xml?origins=" & Origin & "&destinations=" & Destination & "&sensor=false", False
    HttpReq.send
    MsgBox HttpReq.responseText
    Set myDomDoc = New DOMDocument60
    myDomDoc.LoadXML HttpReq.responseText
    Set distanceNode = myDomDoc.SelectSingleNode("/DistanceMatrixResponse/row/element/distance/value")
    getDistance = distanceNode.Text / 1000
End Function
4

1 に答える 1

0

プロジェクトの参照:

System.XML

Imports System.Xmlインポートリストに追加

次のような変数を作成します。

Dim MyXMLDoc As New XmlDocument

ドキュメントをロードするには:

 MyXMLDoc.Load("Document path here")

ノードを読み取るには、次のようなものが機能するはずです。

Dim Items as Xml.XmlNodeList = MyXMLDoc.SelectNodes("ParentNode/ChildNodes")
Dim Item as Xml.XmlNode
Try
  For Each Item in Items
    Dim randomstring As String = Item.GetAttributes.GetNamedItem("ItemName").value
  Next
Catch ex As Exception
End Try

等...

これが少し役立つことを願っています

于 2013-03-02T04:53:12.310 に答える