指定されたフォルダー内のファイルの数を返すために ASP に実装されたコードは、次のようにコピーされます。
'指定されたフォルダー内のファイルの数を返します。入力値は検出されたフォルダーのハードディスクの絶対パスです
関数 CountFilesNumber(フォルダ指定)
ディムobjfso,f,fc
objfso=CreateObject(Scripting.FileSystemObject) を設定します。
f=objfso.GetFolder(folderspec) を設定します。
fc=f.Files を設定します。
CountFilesNumber=fc.Count
fc=何も設定しない
f=何も設定しない
objfso=何も設定しない
終了機能