IsFileSystem

構文
bIsFileSystem = FolderItem.IsFileSystem
引数
戻値

プログラム実行例

ファイルシステムかどうか

DIM Shell = CREATEOLEOBJ("Shell.Application") DIM Folder = Shell.NameSpace("C:\Windows") DIM FolderItems = Folder.Items FOR n = 0 TO FolderItems.Count - 1 DIM FolderItem = FolderItems.Item(n) WITH FolderItem PRINT .IsFileSystem + "<#TAB>" + .Name ENDWITH NEXT