[DJ Mogarych]

А зачем вводить имена вручную? Чем обусловлена такая необходимость?

[alpap]

Vvedit imena failov, rosdelayja ich probelamy »

а если имена файлов имеют пробелы?

[Iska]

DJ Mogarych, alpap, судя по формулировке и тексту в коде — лабораторка.

[Devddd]

Есть условие, что названия файлов и их размещения задавать через командную строку.

[megaloman]

названия файлов и их размещения задавать через командную строку. »

Код:

@Echo Off
	FOR %%f IN (%*) Do Del "%%~f"
	Del %*
Exit /B

для вашего задания, собственно, кроме этого условия и команд-то никаких практически не нужно: »

- Упрощение по идее alpap

[alpap]

Devddd, для вашего задания, собственно, кроме этого условия и команд-то никаких практически не нужно:

Код:

@echo off
echo Введите путь к папке с файлами& set /p spath=
echo Введите имена файлов, обрамляя их парными кавычками ["file.txt" "name 2.txt"]& set /p sname=

pushd "%spath%"
 del %sname%
popd
pause

[Devddd]

Спасибо большое

[pedrosoft]

Всем привет! Чтобы не создавать новую тему спрошу в этой.

Есть такая структура каталогов:
D:\IS\users\
D:\IS\users\Config\
D:\IS\users\Config\TEST
D:\IS\users\Home\
D:\IS\users\Home\TEST
D:\IS\users\Temp\
D:\IS\users\Temp\TEST

Как удалить из каталогов Config, Home, Temp другие подкаталоги, оставив подкаталог TEST?

Нашел два варианта, но не получилось их модифицировать, а в текущем виде они удаляют все каталоги из D:\IS\users\

Код:

for /d %%i in (D:\IS\users\*) do (
    echo %%~nxi | findstr /v "%tapult%" 1>nul && rd /s /q "%%i"
)

Код:

Set Target=D:\IS\users\
Set NoDelete=TEST

For /F "tokens=*" %%D In ('Dir %Target% /A:D /B') Do (
If /I Not "%%D"=="%NoDelete%" (RD /S /Q "%Target%\%%D")
)

[megaloman]

Код:

@Echo Off
	Call :DelDir "D:\IS\users\Config" "Test"
	Call :DelDir "D:\IS\users\Home"   "Test"
	Call :DelDir "D:\IS\users\Temp"   "Test"
Exit /B

:DelDir
	If Not Exist "%~1" (Echo !!! %1 not found &Exit /B 1)
	FOR /F "usebackq delims=" %%d IN (`2^>nul Dir /B /A:D "%~1"`) DO (
		If /I Not "%%~d"=="%~2" Rd /S /Q "%~1\%%d"
	)
Exit /B