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オブジェクトを取得しています。 Folderオブジェクトのサンプルコード実行結果 †C:\wsh>cscript /nologo fso_folder_obj.vbs TypeName(folder_obj) : Folder Type : ローカル ディスク Path : C:\ 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を作成しています。 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 -------- <省略> |