WSH/ディレクトリ内のファイルとフォルダ一覧を取得する方法・Files, Folders
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
開始行:
#navi(../)
* ディレクトリ内のファイル一覧を取得する方法・Filesコレク...
指定したディレクトリ内のファイルおよびフォルダ一覧を取得...
以下にVBScriptのサンプルコードと実行結果を記します。
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* Files, Foldersコレクションを利用したVBScriptサンプルコ...
以下にFiles, Foldersコレクションを利用したサンプルコード...
** Files, Foldersコレクションを利用しファイルおよびフォル...
#ref(flist.vbs)
1: Set fso = CreateObject("Scripting.FileSystemObject")...
2: Set fld = fso.GetFolder("c:\Windows") ...
3: Set ficol = fld.Files ...
4: Set fdcol = fld.SubFolders ...
5:
6: WScript.Echo "-- File list --"
7: WScript.Echo "File count = " & ficol.Count
8: For Each f in ficol
9: WScript.Echo "FileName, Size, LastModified : " & f...
10: Next
11:
12: WScript.Echo "-- Folder list --"
13: WScript.Echo "Folder count = " & fdcol.Count
14: For Each f in fdcol
15: WScript.Echo "FolderName, LastModified : " & f.Nam...
16: Next
17:
18: Set fdcol = Nothing
19: Set ficol = Nothing
20: Set fld = Nothing
21: Set fso = Nothing
上記のVBScriptサンプルコードは、C:\Windowsを対象としてフ...
2行目でFolderオブジェクトを取得し4行目のSubFoldersプロパ...
Filesコレクションの取得は2行目で取得したFolderオブジェク...
6行目から10行目はファイル一覧を出力しています。~
12行目から16行目はフォルダー一覧を出力しています。
尚、本サンプルコードは隠しファイルや画しフォルダなども表...
** サンプルコードの実行結果 [#bc90264b]
以下に上記のサンプルコード実行結果を記します。
-- File list --
File count = 59
FileName, Size, LastModified : 0, 33, 2009/09/21 14:30:36
FileName, Size, LastModified : Acer.tag, 0, 2008/12/23 1...
FileName, Size, LastModified : AppInst.INI, 0, 2012/06/2...
FileName, Size, LastModified : bfsvc.exe, 71168, 2010/11...
FileName, Size, LastModified : bootstat.dat, 67584, 2012...
FileName, Size, LastModified : CSUP.TXT, 10, 2009/09/21 ...
FileName, Size, LastModified : DirectX.log, 31343, 2012/...
FileName, Size, LastModified : DPINST.LOG, 13702, 2012/0...
<snip>
FileName, Size, LastModified : WindowsShell.Manifest, 74...
FileName, Size, LastModified : WindowsUpdate.log, 110903...
FileName, Size, LastModified : winhlp32.exe, 9728, 2009/...
FileName, Size, LastModified : WLXPGSS.SCR, 306040, 2009...
FileName, Size, LastModified : WMSysPr9.prx, 316640, 200...
FileName, Size, LastModified : write.exe, 10240, 2009/07...
-- Folder list --
Folder count = 60
FolderName, LastModified : addins, 2009/07/14 14:32:39
FolderName, LastModified : AppCompat, 2009/07/14 12:20:08
<snip>
FolderName, LastModified : Vss, 2009/07/14 12:20:14
FolderName, LastModified : Web, 2009/07/14 14:32:38
FolderName, LastModified : winsxs, 2012/07/27 0:27:18
#htmlinsertpcsp(win-btm.html,win-sp.html)
終了行:
#navi(../)
* ディレクトリ内のファイル一覧を取得する方法・Filesコレク...
指定したディレクトリ内のファイルおよびフォルダ一覧を取得...
以下にVBScriptのサンプルコードと実行結果を記します。
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* Files, Foldersコレクションを利用したVBScriptサンプルコ...
以下にFiles, Foldersコレクションを利用したサンプルコード...
** Files, Foldersコレクションを利用しファイルおよびフォル...
#ref(flist.vbs)
1: Set fso = CreateObject("Scripting.FileSystemObject")...
2: Set fld = fso.GetFolder("c:\Windows") ...
3: Set ficol = fld.Files ...
4: Set fdcol = fld.SubFolders ...
5:
6: WScript.Echo "-- File list --"
7: WScript.Echo "File count = " & ficol.Count
8: For Each f in ficol
9: WScript.Echo "FileName, Size, LastModified : " & f...
10: Next
11:
12: WScript.Echo "-- Folder list --"
13: WScript.Echo "Folder count = " & fdcol.Count
14: For Each f in fdcol
15: WScript.Echo "FolderName, LastModified : " & f.Nam...
16: Next
17:
18: Set fdcol = Nothing
19: Set ficol = Nothing
20: Set fld = Nothing
21: Set fso = Nothing
上記のVBScriptサンプルコードは、C:\Windowsを対象としてフ...
2行目でFolderオブジェクトを取得し4行目のSubFoldersプロパ...
Filesコレクションの取得は2行目で取得したFolderオブジェク...
6行目から10行目はファイル一覧を出力しています。~
12行目から16行目はフォルダー一覧を出力しています。
尚、本サンプルコードは隠しファイルや画しフォルダなども表...
** サンプルコードの実行結果 [#bc90264b]
以下に上記のサンプルコード実行結果を記します。
-- File list --
File count = 59
FileName, Size, LastModified : 0, 33, 2009/09/21 14:30:36
FileName, Size, LastModified : Acer.tag, 0, 2008/12/23 1...
FileName, Size, LastModified : AppInst.INI, 0, 2012/06/2...
FileName, Size, LastModified : bfsvc.exe, 71168, 2010/11...
FileName, Size, LastModified : bootstat.dat, 67584, 2012...
FileName, Size, LastModified : CSUP.TXT, 10, 2009/09/21 ...
FileName, Size, LastModified : DirectX.log, 31343, 2012/...
FileName, Size, LastModified : DPINST.LOG, 13702, 2012/0...
<snip>
FileName, Size, LastModified : WindowsShell.Manifest, 74...
FileName, Size, LastModified : WindowsUpdate.log, 110903...
FileName, Size, LastModified : winhlp32.exe, 9728, 2009/...
FileName, Size, LastModified : WLXPGSS.SCR, 306040, 2009...
FileName, Size, LastModified : WMSysPr9.prx, 316640, 200...
FileName, Size, LastModified : write.exe, 10240, 2009/07...
-- Folder list --
Folder count = 60
FolderName, LastModified : addins, 2009/07/14 14:32:39
FolderName, LastModified : AppCompat, 2009/07/14 12:20:08
<snip>
FolderName, LastModified : Vss, 2009/07/14 12:20:14
FolderName, LastModified : Web, 2009/07/14 14:32:38
FolderName, LastModified : winsxs, 2012/07/27 0:27:18
#htmlinsertpcsp(win-btm.html,win-sp.html)
ページ名: