-
ฟังก์ชั่น bianli (เส้นทาง)
'เริ่มต้น
path = server.mappath (พา ธ )
ตั้งค่า fso = server.createObject (scripting.filesystemobject)
ตั้งค่า objfolder = fso.getFolder (เส้นทาง)
ตั้งค่า objfiles = objfolder.files
'把文件名及文件路经存入 Thefiles 数组
int slot = 0
หรี่ไฟ ()
Redim thefiles (50)
สำหรับ objfile แต่ละตัวใน objfiles
filename = objfile.name
filePath = split (objfile.path, docs/)
ThePath1 = ./docs/
ThePath = ThePath1 & FilePath (1)
Thefiles (สล็อต) = ชื่อไฟล์ & ** & thepath
สล็อต = สล็อต + 1
ถ้าสล็อต> ubound (thefiles) จากนั้น
Redim Preserve thefiles (สล็อต+20)
สิ้นสุดถ้า
ต่อไป
Redim Preserve thefiles (สล็อต)
'冒泡排序
สำหรับ i = 0 ถึง Ubound (thefiles) -2
สำหรับ j = i+1 ถึง ubound (thefiles) -1
ถ้า strComp (thefiles (i), thefiles (j)) = 1 แล้ว
tmp = thefiles (i)
Thefiles (i) = thefiles (j)
Thefiles (j) = tmp
สิ้นสุดถ้า
ต่อไป
ต่อไป
'输出
สำหรับ i = 0 ถึง Ubound (thefiles) -1
para = thefiles (i)
ชื่อไฟล์ = แยก (para, **,-1,1) (0)
filePath = split (para, **,-1,1) (1)
-
<p allign = ซ้าย>
--- <img src = '../../images/arrow_orange.gif' width = '14 'ความสูง = '11'>
<a href = '<%= filepath%>'> <span class = activelink_yellow> <%= filename%> </span> </a>
</p>
-
ต่อไป
ฟังก์ชันสิ้นสุด
-