欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

用asp實現(xiàn)的獲取文件夾中文件的個數(shù)的代碼

 更新時間:2009年12月08日 02:20:48   作者:  
asp實現(xiàn)的返回指定文件夾中文件的數(shù)目的代碼
復(fù)制代碼 代碼如下:

'返回指定文件夾中文件的數(shù)目,傳入值為被檢測文件夾的硬盤絕對路徑
function CountFilesNumber(folderspec)
Dim objfso,f,fc
Set objfso=CreateObject("Scripting.FileSystemObject")
Set f=objfso.GetFolder(folderspec)
Set fc=f.Files
CountFilesNumber=fc.Count
set fc=nothing
set f=nothing
set objfso=nothing
End Function

相關(guān)文章

最新評論