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
  1. script.function.CREATEOLEOBJ（1）
  2. com.Shell.NameSpace（2）
  3. com.Shell.Folder.Items（3）
  4. com.Shell.FolderItems.Count（5）
  5. com.Shell.FolderItems.Item（6）
  6. com.Shell.FolderItem.IsFileSystem（8）
  7. com.Shell.FolderItem.Name（8）