登录

2023-05-12 开启多语言插件支持……

> 技术流 > asp > ASP实现结构化列举并查看某路径下所有文件

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

asp 苏 demo 9年前 (2015-01-04) 3041℃ 0评论

<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:bla nk> </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>

打赏

转载请注明：苏demo的别样人生 » ASP实现结构化列举并查看某路径下所有文件

   如果本篇文章对您有帮助，欢迎向博主进行赞助，赞助时请写上您的用户名。

   支付宝直接捐助帐号oracle_lee@qq.com 感谢支持！