vb6讀取XML搜尋時遇到問題(MSXML6.0)- 藍色小舖 BlueShop

台灣最大程式設計社群網站

∣免費加入會員∣登入 ∣回首頁∣ 您好

線上人數
1215

會員總數：246274
討論主題：189809

登入

登出

歡迎您免費加入會員

討論區選單

開發工具

行動裝置開發

資料庫

多媒體 / 網管

綜合

文章區

討論區列表 >> VB6 >> vb6讀取XML搜尋時遇到問題(MSXML6.0)

[]

[我要回覆]

vb6讀取XML搜尋時遇到問題(MSXML6.0)
價值 : 20 QP 點閱數:1776 回應數:0

樓主

對數狗

0	3
112	7

發送站內信

請教各位先進
再vb6讀xml檔案遇到一些問題
我的XML結構如下
http://ppt.cc/axK9
再讀取PLUPrice和PLUCount時
我只想將OrderID=801121108282991底下的
PluPrice和PluCount通通讀出來
但是實際測試的時候
卻會將OrderID不等於801121108282991底下的PluPrice和PluCount
也讀出來
不知道是不是使用方法有問題

Private Sub GetPLUPrice()

PLUDataCount = 0
  
  If OrderCount > 1 Then
     <span style="color: Red;"> Set PLUPriceList = XMLReader.selectNodes("/OrderItems/OrderData/PluItem/PluPrice[/OrderItems/OrderData/OrderID=801121108282991]")</span>
      For Each ObjNode In PLUPriceList
           PLUPrice(PLUDataCount) = ObjNode.nodeTypedValue
           Debug.Print PLUPrice(PLUDataCount)
           PLUDataCount = PLUDataCount + 1
       
      Next
  Else
        Set PLUPriceList = XMLReader.selectNodes("//PluPrice")
        For Each ObjNode In PLUPriceList
           PLUPrice(PLUDataCount) = ObjNode.nodeTypedValue
           Debug.Print PLUPrice(PLUDataCount)
           PLUDataCount = PLUDataCount + 1
        Next
  End If
  
End Sub
Private Sub GetPLUCount()

PLUDataCount = 0
  
  
  If OrderCount > 1 Then
<span style="color: Red;">Set PLUCountList = XMLReader.selectNodes("/OrderItems/OrderData/PluItem/PluCount[/OrderItems/OrderData/OrderID=801121108282991]")</span>
      
      For Each ObjNode In PLUCountList
            PLUCount(PLUDataCount) = ObjNode.nodeTypedValue
            Debug.Print PLUCount(PLUDataCount)
            PLUDataCount = PLUDataCount + 1
      Next
  Else
       Set PLUCountList = XMLReader.selectNodes("//PluCount")
       For Each ObjNode In PLUCountList
          PLUCount(PLUDataCount) = ObjNode.nodeTypedValue
          Debug.Print PLUCount(PLUDataCount)
          PLUDataCount = PLUDataCount + 1
       Next
  End If
End Sub

搜尋相關Tags的文章： [ vb6 xml msxml selectnodes ] ,
本篇文章發表於2012-11-16 18:04

目前尚無任何回覆

回覆

如要回應,請先登入.