このエントリーをはてなブックマークに追加


FileSystemObjectのFolderオブジェクトとFoldersコレクションの調査

本資料はファイル、フォルダ、ドライブなどを扱うオブジェクトFileSystemObjectに含まれているFolderオブジェクトおよびFoldersコレクションについて調査した資料です。


関連資料

Folderオブジェクト

Folderオブジェクトのサンプルコードを以下に記します。

Folderオブジェクトのサンプルコード

1: Set fso = CreateObject("Scripting.FileSystemObject")
2: Set folder_obj = fso.GetFolder("c:\")
3: WScript.Echo "TypeName(folder_obj) : " & TypeName(folder_obj)
4: WScript.Echo "Type : " & folder_obj.Type
5: WScript.Echo "Path : " & folder_obj.Path

2行目のGetFolderメソッドによりFolderオブジェクトを取得しています。
3行目はTypeName関数を使って種別がFolderオブジェクトであることを確認しています。
4,5行目は取得したFolderオブジェクトのType, Pathプロパティ値を出力しています。

Folderオブジェクトのサンプルコード実行結果

C:\wsh>cscript /nologo fso_folder_obj.vbs
TypeName(folder_obj) : Folder
Type : ローカル ディスク
Path : C:\

Foldersコレクション

Foldersコレクションのサンプルコードを以下に記します。
サンプルコードでは、FolderオブジェクトにSubFoldersプロパティがあり、Foldersコレクションが返却されます。
取得したFoldersコレクションを操作するサンプルコードになります。

Foldersコレクションのサンプルコード

 1: Set fso = CreateObject("Scripting.FileSystemObject")
 2: Set oFolder = fso.GetFolder("c:\")
 3: WScript.Echo "TypeName(oFolder) : " & TypeName(oFolder)
 4: 
 5: Set folders_collection = oFolder.SubFolders
 6: WScript.Echo "TypeName(folders_collection) : " & TypeName(folders_collection)
 7: 
 8: For Each f in folders_collection
 9:   WScript.Echo "--------"
10:   WScript.Echo "TypeName(f) : " & TypeName(f)
11:   WScript.Echo "Path : " & f.Path
12:   WScript.Echo "DateCreated : " & f.DateCreated
13: Next

1行目はFileSystemObjectを作成しています。
2,3行目はGetFolderメソッドでFolderオブジェクトを取得し、TypeName関数で種別を表示しています。
5,6行目はFolderオブジェクトのSubFoldersプロパティを呼び出しFoldersコレクションを取得し、TypeName関数で種別を表示しています。
8行目〜13行目は取得したFoldersコレクションをFor Eachで1つずつ取り出しています。
取り出した編集種別は10行目のTypeName関数でFolderオブジェクトであることが確認できます。
11,12行目でFolderオブジェクトのName, DateCreatedプロパティの値を表示しています。
動作結果については以下のサンプルコードの実行結果を参考にしてください。

Foldersコレクションのサンプルコード実行結果

C:\wsh>cscript /nologo fso_folders_collection.vbs
TypeName(oFolder) : Folder
TypeName(folders_collection) : Folders
--------
TypeName(f) : Folder
Path : C:\$Recycle.Bin
DateCreated : 2009/07/14 11:36:15
--------
TypeName(f) : Folder
Path : C:\b724c4f4e3d195cb5e7bb44322d83cb0
DateCreated : 2012/05/04 9:00:54
--------
TypeName(f) : Folder
Path : C:\Config.Msi
DateCreated : 2012/05/04 9:01:11
--------
TypeName(f) : Folder
Path : C:\Documents and Settings
DateCreated : 2009/07/14 13:53:55

<省略>

TypeName(f) : Folder
Path : C:\Users
DateCreated : 2009/07/14 11:37:05
--------
TypeName(f) : Folder
Path : C:\Windows
DateCreated : 2009/07/14 11:37:05
--------
<省略>
 


添付ファイル: filefso_folder_obj.vbs 435件 [詳細] filefso_folders_collection.vbs 456件 [詳細]

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2015-03-20 (金) 22:50:39