关于ADO记录集设计解决方案

学习ADO时，你可能会遇到ADO记录集问题，这里将介绍ADO记录集问题的解决方法，在这里拿出来和大家分享一下。根据您决定使用哪一种上述解决方案，可以有几种不同的方法来实现这一点。我们将单独考察每个解决方案。返回的数据是记录集的一种简单XML数据表示。现在，我们将使用MicrosoftXMLDocumentObjectModel(DOM)来检索此数据，以便在内部循环处理每一条记录，XML对这一过程的表示如下：

创新互联建站是一家集网站建设,扎赉特企业网站建设,扎赉特品牌网站建设,网站定制,扎赉特网站建设报价,网络营销,网络优化,扎赉特网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。

 
 
  
  PrivateSubCommand1_Click() 
  
  DimaryArtists()AsString 
  
  DimoRopeasNewRope.Proxy 
  
  oRope.LoadServicesDescriptionicURI,"http://MyServer/GetArtists.xml" 
  
  GetArtistsFromXMLoRope.GetAllArtists(),aryArtists() 
  
  '现在aryArtists()是包含我们的艺术家的一个数组 
  
  SetoRope=Nothing
  
  EndSub 
  
  http://www.mscto.com 
  
  
  
  PrivateSubGetArtistsFromXML(ByValsXMLAsString,ByRefaryArtists()AsString) 
  
  DimoXMLAsNewMSXML.DOMDocument 
  
  DimoXMLDocumentAsMSXML.IXMLDOMElement 
  
  DimiCountAsInteger 
  
  DimxAsInteger 
  
  
  
  oXML.loadXMLsXML 
  
  SetoXMLDocument=oXML.documentElement 
  
  iCount=oXMLDocument.childNodes.length 
  
  
  
  ReDimaryArtists(iCount-1) 
  
  
  
  Forx=0ToiCount-1 
  
  aryArtists(x)=oXMLDocument.childNodes.Item(x).Text 
  
  Next 
  
  
  
  SetoXML=Nothing
  
  SetoXMLDocument=Nothing
  
  EndSub

#T#Command1_Click()方法使用ROPE调用服务。因为该服务按解决方案1中指定的方式返回数据，所以现在就可以传递包含在我们的XML字符串中的返回数据。我们按值传递该字符串，并按引用传递一个将被置入PublicSubGetArtistsFromXML中的空数组。此过程置入数组并将它返回给调用过程。数组变量aryArtists()现在包含我们的艺术家的一个数组。为了将此XML数据返回给一个ADO记录集，我们需要将数据加载到XMLDOM中，然后使用ADO记录集的OPEN方法创建艺术家的记录集：

 
 
  
  PrivateSubCommand1_Click() 
  
  DimoRSAsADODB.Recordset 
  
  DimoRopeasNewRope.Proxy 
  
  oRope.LoadServicesDescriptionicURI,"http://MyServer/GetArtists.xml" 
  
  SetoRS=CreateADORSFromXML(oRope.GetAllArtists()) 
  
  '现在oRS是包含我们的艺术家数据的一个分离的ADO记录集 
  
  
  
  SetoRope=Nothing
  
  SetoRS=Nothing
  
  EndSub 
  
  PrivateFunctionCreateADORSFromXML(ByValsXMLAsString)AsADODB.Recordset 
  
  DimoXMLAsNewMSXML.DOMDocument 
  
  DimoRSAsNewADODB.Recordset 
  
  
  
  oXML.loadXMLsXML 
  
  oRS.OpenoXML 
  
  
  
  SetCreateADORSFromXML=oRS
  
  SetoRS=Nothing
  
  SetoXML=Nothing
  
  EndFunction

在Command1_Click()事件中，ROPE对象调用我们的方法，该方法会就像在解决方案2中那样返回我们的XML字符串。通过调用CreateADORSFromXML函数，就可以设置一个对象引用从SOAP返回数据创建一个分离的记录集。

当前名称：关于ADO记录集设计解决方案
网页地址：http://www.mswzjz.cn/qtweb/news44/237494.html

攀枝花网站建设、攀枝花网站运维推广公司-贝锐智能，是专注品牌与效果的网络营销公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：贝锐智能

贝锐智能技术为您推荐以下文章