ASP网页设计遍历XML文档前往二维数组(ASP)(更新版)...
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。xml|遍历|数组|xml|遍历|数组<%onerrorresumenext<!]>成绩没处置
xmlfile="???.xml"
Setxml=Server.CreateObject("MSXML.DOMDocument")
xml.async=false
xml.load(xmlfile)
PublicFunctionPrettyPrint(node,tabLevel)
onerrorresumenext
Ifnode.nodeNamevbNullStrinAndnode.nodeName"#text"Then
PrettyPrint=PrettyPrint&tabLevel&"0"+node.nodeName+""
ForEachiInnode.Attributes
pstr=pstr+i.Name+"="+i.Value+""
Next
PrettyPrint=PrettyPrint&tabLevel&"2"+pstr+""
EndIf
Ifnode.hasChildNodesThen
ForEachchildNodeInnode.childNodes
tabLevel=tabLevel+1
PrettyPrint=PrettyPrint+PrettyPrint(childNode,tabLevel)
Next
Else
PrettyPrint=PrettyPrint&tabLevel-1&"1"+node.Text+""
EndIf
EndFunction
PublicFunctionShowXml(s)
onerrorresumenext
ta=split(s,"")
k=ubound(ta)-1
response.write"sta("&k&",2)<p>"
redimsta(k,2)
fori=0tok
ta2=split(ta(i),"")
cs1=ta2(0)
cs2=ta2(1)
cs3=ta2(2)
Response.write"sta("&cs1&","&cs2&")="&cs3&"<br>"
sta(cs1,cs2)=cs3
Next
ShowXml=sta
EndFunction
test=ShowXml(PrettyPrint(xml.documentElement,0))
response.write"<tablewidth=100%border=1bgcolor=#dddddd>"+chr(13)
response.write"<trbgcolor=#767A7D>"
response.write"<td>nodeName</td><td>nodeValue</td><td>Attributes</td>"
response.write"</tr>"+chr(13)
forb=0toubound(test)
Iftest(b,0)""then
response.write"<tr"
Ifb=0thenresponse.write"bgcolor=#939495"endif
IfIsEmpty(test(b,1))andb0thenresponse.write"bgcolor=#BABBBC"endif
response.write">"
response.write"<td>"&test(b,0)&"</td>"
response.write"<td>"&test(b,1)&"</td>"
response.write"<td>"&test(b,2)&"</td>"
response.write"</tr>"+chr(13)
Endif
next
response.write"</table>"
%>
PrettyPrint函数前往字符串
ShowXml函数处置PrettyPrint的前往值并前往一个二维数组
</p>ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。 另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件) 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。 学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点: 我认为比较好的方法是找一些比较经典的例子,每个例子比较集中一种编程思想而设计的。 ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。 跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组 最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
页:
[1]