ASP常用函数：ArrayToxml
2018-09-06 12:42
阅读：434
<%
PublicFunctionArrayToxml(DataArray,Recordset,row,xmlroot)
Dimi,node,rs,j
Ifxmlroot=Thenxmlroot=xml
SetArrayToxml=Server.CreateObject(msxml2.FreeThreadedDOMDocument&MsxmlVersion)
ArrayToxml.appendChild(ArrayToxml.createElement(xmlroot))
Ifrow=Thenrow=row
Fori=0ToUBound(DataArray,2)
SetNode=ArrayToxml.createNode(1,row,)
j=0
ForEachrsinRecordset.Fields
j=j+1
Next
ArrayToxml.documentElement.appendChild(Node)
Next
EndFunction
%>
上一篇：ASP在线升级类文件
文章来自：搜素材网的编程语言模块，转载请注明文章出处。
文章标题：ASP常用函数：ArrayToxml
文章链接：http://soscw.com/index.php/essay/10600.html
文章标题：ASP常用函数：ArrayToxml
文章链接：http://soscw.com/index.php/essay/10600.html
评论
亲，登录后才可以留言！