Немного подумал и подсократил
Код:
![Выделить весь код](images/misc/selectcode.png)
@Echo Off
cls
Set "DelFile=*.txt"
Set "BoxIn=C:\Users"
For /f "tokens=1,2* delims= " %%i In ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList" /S') Do (
If /I "%%i"=="ProfileImagePath" If /I "%%~dpk"=="%BoxIn%\" Echo === %%k &Dir /A:-D /B "%%k\%DelFile%"
)
pause
GoTo :Eof
Dir /A:-D /B -->
Del
Может еще подумать?
После поста
alpap
Код:
![Выделить весь код](images/misc/selectcode.png)
@Echo Off
cls
Set "DelFile=*.txt"
Set "BoxIn=C:\Users"
For /f "tokens=3 delims= " %%i In ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList" /S /V ProfileImagePath') Do (
If /I "%%~dpi"=="%BoxIn%\" Echo === %%i &Dir /A:-D /B "%%i\%DelFile%"
)
pause
GoTo :Eof