日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關咨詢
選擇下列產(chǎn)品馬上在線溝通
服務時間：8:30-17:00
你可能遇到了下面的問題
關閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
關于ADO記錄集設計解決方案

學習ADO時，你可能會遇到ADO記錄集問題，這里將介紹ADO記錄集問題的解決方法，在這里拿出來和大家分享一下。根據(jù)您決定使用哪一種上述解決方案，可以有幾種不同的方法來實現(xiàn)這一點。我們將單獨考察每個解決方案。返回的數(shù)據(jù)是記錄集的一種簡單XML數(shù)據(jù)表示。現(xiàn)在，我們將使用MicrosoftXMLDocumentObjectModel(DOM)來檢索此數(shù)據(jù)，以便在內(nèi)部循環(huán)處理每一條記錄，XML對這一過程的表示如下：

創(chuàng)新互聯(lián)建站是一家集網(wǎng)站建設,扎賚特企業(yè)網(wǎng)站建設,扎賚特品牌網(wǎng)站建設,網(wǎng)站定制,扎賚特網(wǎng)站建設報價,網(wǎng)絡營銷,網(wǎng)絡優(yōu)化,扎賚特網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強企業(yè)競爭力?？沙浞譂M足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時我們時刻保持專業(yè)、時尚、前沿，時刻以成就客戶成長自我，堅持不斷學習、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網(wǎng)站。

 
 
    
  
  
  1. PrivateSubCommand1_Click() 
    2. 
  
  
  2. DimaryArtists()AsString 
    3. 
  
  
  3. DimoRopeasNewRope.Proxy 
    4. 
  
  
  4. oRope.LoadServicesDescriptionicURI,"http://MyServer/GetArtists.xml" 
    5. 
  
  
  5. GetArtistsFromXMLoRope.GetAllArtists(),aryArtists() 
    6. 
  
  
  6. '現(xiàn)在aryArtists()是包含我們的藝術家的一個數(shù)組 
    7. 
  
  
  7. SetoRope=Nothing
    8. 
  
  
  8. EndSub 
    9. 
  
  
  9. http://www.mscto.com 
    10. 
  
  
  10. 
  
  
  11. PrivateSubGetArtistsFromXML(ByValsXMLAsString,ByRefaryArtists()AsString) 
    12. 
  
  
  12. DimoXMLAsNewMSXML.DOMDocument 
    13. 
  
  
  13. DimoXMLDocumentAsMSXML.IXMLDOMElement 
    14. 
  
  
  14. DimiCountAsInteger 
    15. 
  
  
  15. DimxAsInteger 
    16. 
  
  
  16. 
  
  
  17. oXML.loadXMLsXML 
    18. 
  
  
  18. SetoXMLDocument=oXML.documentElement 
    19. 
  
  
  19. iCount=oXMLDocument.childNodes.length 
    20. 
  
  
  20. 
  
  
  21. ReDimaryArtists(iCount-1) 
    22. 
  
  
  22. 
  
  
  23. Forx=0ToiCount-1 
    24. 
  
  
  24. aryArtists(x)=oXMLDocument.childNodes.Item(x).Text 
    25. 
  
  
  25. Next 
    26. 
  
  
  26. 
  
  
  27. SetoXML=Nothing
    28. 
  
  
  28. SetoXMLDocument=Nothing
    29. 
  
  
  29. EndSub 
    30.

#T#Command1_Click()方法使用ROPE調(diào)用服務。因為該服務按解決方案1中指定的方式返回數(shù)據(jù)，所以現(xiàn)在就可以傳遞包含在我們的XML字符串中的返回數(shù)據(jù)。我們按值傳遞該字符串，并按引用傳遞一個將被置入PublicSubGetArtistsFromXML中的空數(shù)組。此過程置入數(shù)組并將它返回給調(diào)用過程。數(shù)組變量aryArtists()現(xiàn)在包含我們的藝術家的一個數(shù)組。為了將此XML數(shù)據(jù)返回給一個ADO記錄集，我們需要將數(shù)據(jù)加載到XMLDOM中，然后使用ADO記錄集的OPEN方法創(chuàng)建藝術家的記錄集：

 
 
    
  
  
  1. PrivateSubCommand1_Click() 
    2. 
  
  
  2. DimoRSAsADODB.Recordset 
    3. 
  
  
  3. DimoRopeasNewRope.Proxy 
    4. 
  
  
  4. oRope.LoadServicesDescriptionicURI,"http://MyServer/GetArtists.xml" 
    5. 
  
  
  5. SetoRS=CreateADORSFromXML(oRope.GetAllArtists()) 
    6. 
  
  
  6. '現(xiàn)在oRS是包含我們的藝術家數(shù)據(jù)的一個分離的ADO記錄集 
    7. 
  
  
  7. 
  
  
  8. SetoRope=Nothing
    9. 
  
  
  9. SetoRS=Nothing
    10. 
  
  
  10. EndSub 
    11. 
  
  
  11. PrivateFunctionCreateADORSFromXML(ByValsXMLAsString)AsADODB.Recordset 
    12. 
  
  
  12. DimoXMLAsNewMSXML.DOMDocument 
    13. 
  
  
  13. DimoRSAsNewADODB.Recordset 
    14. 
  
  
  14. 
  
  
  15. oXML.loadXMLsXML 
    16. 
  
  
  16. oRS.OpenoXML 
    17. 
  
  
  17. 
  
  
  18. SetCreateADORSFromXML=oRS
    19. 
  
  
  19. SetoRS=Nothing
    20. 
  
  
  20. SetoXML=Nothing
    21. 
  
  
  21. EndFunction 
    22.

在Command1_Click()事件中，ROPE對象調(diào)用我們的方法，該方法會就像在解決方案2中那樣返回我們的XML字符串。通過調(diào)用CreateADORSFromXML函數(shù)，就可以設置一個對象引用從SOAP返回數(shù)據(jù)創(chuàng)建一個分離的記錄集。


網(wǎng)站欄目：關于ADO記錄集設計解決方案
文章起源：http://www.5511xx.com/article/dpcooci.html