FolderItemオブジェクトがフォルダの場合、Folderオブジェクトを返します。
- 構文
- Folder( Shell ) = FolderItem.GetFolder
- 引数
- 戻り値
FolderItem オブジェクトを返す可能性のあるメソッド・プロパティ
プログラム実行例
選択したフォルダ内のサブフォルダを取得
CONST ssfDesktop = 0
DIM Shell = CREATEOLEOBJ("Shell.Application")
DIM Folder = Shell.BrowseForFolder(0, "フォルダを選択", 0, ssfDesktop)
DIM FolderItems = Folder.Items
FOR FolderItem IN FolderItems
IFB FolderItem.IsFolder THEN
Folder = FolderItem.GetFolder
PRINT Folder.Title
ENDIF
NEXT