次のページにある XQuery のサンプルを Visual Basic 2005 Express で実行させようとしています。
http://www.atmarkit.co.jp/fxml/tanpatsu/19quip/quip01.html
Dim objXPathDoc As New Xml.XPath.XPathDocument("Test.xml")
Dim objXNvg As Xml.XPath.XPathNavigator = objXPathDoc.CreateNavigator
Dim strXQuery As String = _
"for $i in " + vbCrLf + _
"document(""Test.xml"")//project[count(members/member)>=2] " + vbCrLf + _
"return " + vbCrLf + _
"<result><project name=""{$i/name/text()}"" /> " + vbCrLf + _
"<members>{$i//member/name}</members> " + vbCrLf + _
"</result>"
Dim objNodes As Xml.XPath.XPathNodeIterator = _
objXNvg.Select(strXQuery)
Do While objNodes.MoveNext
Debug.Print(objNodes.Current.Value + vbCrLf)
Loop
このようなコードなのですが、Select メソッドところで “トークンが無効です。”というエラーが発生し、実行できません。
Visual Basic 2005 Express の XPath パッケージは、XQuery 1.0 に準拠しているという記述がヘルプにあったので実行できるはずなのですが。。。。。
どのなたか分かる方、おりましたら書き込みお願いします。