当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP实现结构化列举并查看某路径下所有文件

ASP
批量文件自动搜索替换插入器 Ver2.1
用asp实现批量删除bak文件
在线扫描探测检查asp站点木马后门的程序
[原创]随机增加网站点击的一个不错的方法
flash和asp分页的一点心得与flash脚本
ASP中常用的函数和详细说明
用javascript编写asp应用--第一课--通览
javascript asp教程第四课 同时使用vbscript和javascript
javascript asp教程第五课--合二为一
javascript asp教程第七课--response属性
javascript asp教程第八课--request对象
javascript asp教程第九课--cookies
javascript asp教程第十课--global asa
javascript asp教程第十一课--Application 对象
javascript asp教程第十二课---session对象
javascript asp教程第十三课--include文件
javascript asp教程服务器对象
javascript asp教程错误处理
javascript asp教程创建数据库连接
javascript asp教程Recordset记录

ASP实现结构化列举并查看某路径下所有文件


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 201 ::
收藏到网摘: n/a

<style 此样式表须保留>
<!--
   u.{background-color:FEDC76;cursor:hand;}
   a{background-color:97EF53;}
   font{padding-bottom:0;padding-top:0;margin-bottom:0;margin-top:0;}
-->
</style>
<title>本站文件地图</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:red>Hide/Show =></a>
</span>
<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="about:blank"> </iframe>
</div>
<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
-->
</Script>