Вопрос : Уничтоженные, котор гнездят скоросшиватели и архивы с powershell

Мне нужен сценарий, котор он может быть vb или powershell или даже командным файлом уничтожат все содержание нескольких sub скоросшивателей от директории только выходить первому уровню sub скоросшиватель неповрежденн. Например:

After
D:\Books\400\test.txt
D:\Books\300\301\test.txt
D:\Books\200\202\test.txt

D:\Books\100\101\test.txt, котор сценарий бежит я хочет только иметь эту левую сторону:

I am
D:\Books\400
D:\Books\300
D:\Books\200
D:\Books\100 вставило на этой стадии using powershell:

Get-ChildItem - курс D:\Books - Recurse - усилие |
Remove-Item - Force
class=

Ответ : Уничтоженные, котор гнездят скоросшиватели и архивы с powershell

Здесь правильно сценарий.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
Установите objFSO = CreateObject («Scripting.FileSystemObject»)

Установите objTopFolder = objFSO.GetFolder («C:\Books ")

Для каждого objSubFolder в objTopFolder.SubFolders
	Для каждого objFile в objSubFolder.Files
		WScript.Echo «Delete» & objFile
		objFSO.DeleteFile objFile
	Затем
	Для каждого objSubSubFolder в objSubFolder.SubFolders
		WScript.Echo «Delete» & objSubSubFolder
		objSubSubFolder objFSO.DeleteFolder
	Затем
Затем
Другие решения  
  •  Как я добавляю кнопки на форме PDF для того чтобы добавить/извлекаю рядки данных?
  •  Шнур ошибки в блоке задвижки?
  •  сколько вариант сервера SQL на одной машине
  •  Внешний вид 2007 не может архивный файл открытой сети сохраненный
  •  Активно директория DNS записывает вопрос
  •  Отчет о доступа 2010 экспорта к CSV с коллекторами?
  •  Прокладчик OCE 9400 не начинает
  •  как добавить десятичное место в формуле в отчете о кристалла seagate
  •  Windows XP и Мичрософт Оутлоок и проблемы установителя Windows
  •  VB6 к VS2010 - консультации тренировки?
  •  
    programming4us programming4us