Dim isDir As Boolean = (System.IO.File.GetAttributes(path) And System.IO.FileAttributes.Directory) = FileAttributes.Directory