'定義獲取排序檔案列表的函式
function getsortedfiles(folderpath)
dim rs, fso, folder, file
const adinteger = 3
const addate = 7
const advarchar = 200
set rs = server.createobject("adodb.recordset")
set fso = server.createobject("scripting.filesystemobject")
set folder = fso.getfolder(folderpath)
set fso = nothing
with rs.fields
end with
rs.open
for each file in folder.files
rs.addnew
rs("name") = file.name
rs("type") = file.type
rs("datecreated") = file.datecreated
rs("datelastaccessed") = file.datelastaccessed
rs("datelastmodified") = file.datelastmodified
rs("size") = file.size
rs.update
next
'設定排序規則:按名稱排序
rs.sort = "name asc"
''設定排序規則:依次按檔案大小倒序,按修改日期倒序
'rs.sort = "size desc, datelastmodified desc"
rs.movefirst
set folder = nothing
set getsortedfiles = rs
end function
'呼叫函式並輸出結果集
dim rs
while not rs.eof
response.write "" & rs("name") & " | " & rs("type") & "
" rs.movenext
wend
rs.close
set rs = nothing
%> ASP程式設計入門高階 十七 FSO元件之資料夾操作
操作完驅動器,接著就是來操作資料夾了。其中包括 提取資料夾資訊 建立資料夾 刪除資料夾 複製資料夾 移動資料夾等。下面就具體來看。一 fso.getfolder 1,getfldr.asp set fso createobject scripting.filesystemobject set fld...
FSO元件之資料夾操作
操作完驅動器,接著就是來操作資料夾了。其中包括 提取資料夾資訊 建立資料夾 刪除資料夾 複製資料夾 移動資料夾等。下面就具體來看。一 fso.getfolder 一看就明白,是提取資料夾了。那具體是提取哪個資料夾呢?後面肯定要跟乙個資料夾的路徑。提取出來了再來顯示該資料夾喙匭畔 兀渴遣皇怯幸 嚀逄崛...
windows資料夾列表展示資料夾大小
通常情況下,檢視windows資源管理器中資料夾大小都需要右鍵檢視資料夾屬性,才可以看到,或者從資料夾選項中勾選滑鼠指向資料夾和桌面項時顯示提示資訊,這樣可以將滑鼠移動到資料夾上檢視資料夾的大小,但是這也不太方便,其實想要達到的效果是,在windows資源管理器中資料夾列表中可以直接展示資料夾大小。...