2018年04月6日网站服务器迁移完成……

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

asp 苏 demo 2213℃ 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 感谢支持!
喜欢 (0)or分享 (0)
发表我的评论
取消评论
表情