ASP实现结构化列举并查看某路径下所有文件,ASP实现结构化列举并查看某路径下所有文件
【 tulaoshi.com - ASP 】
<style 此样式表须保留
<!--
u.{background-color:FEDC76;cursor:hand;}
a{background-color:97EF53;}
font{padding-bottom:0;padding-top:0;margin-bottom:0;margin-top:0;}
--
<title本站文件地图<body
<span id=shhi style="text-align:right;width:20%;position:absolute;bottom:0"
<a href=# onclick=’jscript:if(rightf.style.display=="")rightf.style.display="none";else rightf.style.display="";return false’ style=background-color:redHide/Show =<div id=rightf style="height:100%;width:80%;position:absolute;right:0;top:0"
<iframe align=right name="right" scrolling=auto style="height:100%;width:100%;" src="http://img.tulaoshi.com/attachment/portal" <base target="right"
<Script language=VBScript
<!--
Sub window_onscroll()
rightf.style.pixelTop=document.body.scrollTop
shhi.style.top=document.body.clientHeight+document.body.scrollTop-30
End Sub
sub DoFold(index) ’显示与隐藏某节点的过程
dim itm
set itm=eval("divfold" & index)
if itm.style.display="none" then
itm.style.display=""
else
itm.style.display="none"
end if
set itm = document.all(itm.sourceIndex-2)
if itm.innerText="0" then
itm.innerText="1"
else
itm.innerText="0"
end if
set itm=document.all("itmjj" & index)
if not itm is nothing then
if itm.innerText="+" then
itm.innerText="-"
else
itm.innerText="+"
end if
end if
end sub
--
本新闻共2页,当前在第1页 1 2
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com/asp/）来源:http://www.tulaoshi.com/n/20160129/1510205.html
看过《ASP实现结构化列举并查看某路径下所有文件》的人还看了以下文章 更多>>
![[ASP]使用类实现模块化](http://img.tulaoshi.com/201602/19/e71db91411ad76aa6020bb653b04c568_thumb_189.jpg)