[mwz]

предложите решение »

Что-то судя по вопросу, я неверно понял задачу... Но всё же (только принцип; хотя список папок пользователей может и проще обработать, тем более что в итоге фактически будем иметь то же самое):

Найти в ключе

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList

все ветви, начинающихся на

S-1-5-21

(это SID-ы пользователей, причём тех, кто хотя бы раз залогинился в системе: если пользователь создан, но в систему ни разу не входил — его ключа здесь не будет, как и папки его).

И прочитать в каждом из найденных S-1-5-21 значение параметра ProfileImagePath, которое и укажет на папку этого пользователя.

Ну и напомню на всякий случай, что SID S-1-5-21-XXXXXXX-XXXXXXXX-XXXXXXXXXXX-500 — это встроенный администратор. Если он в систему не входил — ни ключа, ни папки его профиля тоже не будет создано.

[alpap]

Ваш скрипт с || »

точно
так я делал в таком случае, когда были заданы имена пользователей

Код:

for %%a in (user1 user2 userN) do net user|find "%%a"||echo del /s /q "C:\Users\%%a"

[alpap]

вот, собственно, все имена пользователей исключая текущего админа:

Код:

@echo off
for /f "skip=1 delims=" %%a in ('wmic path Win32_UserAccount get FullName /value^|find "="') do set "%%a"& call :#
pause& exit

:#
 if not "%FullName%"=="" echo %FullName%
exit /b

(если брать Name, то будет и имя текущего админа и еще Администратор и Гость)

[megaloman]

mwz,

Код:

@Echo Off
cls
	Set "DelFile=*.txt"
	For /f "delims=" %%i In ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList"') Do Call :RegPars "%%i" "%DelFile%"
pause
GoTo :Eof

:RegPars
	FOR /F "tokens=4*  delims=-" %%a IN (%1) DO If %%a==21 (
		For /f "skip=2 tokens=3 delims= " %%p In ('reg query %1 /v ProfileImagePath') Do (
			Echo === %%p
			Dir /A:-D /B "%%p\%~2"
		)
	)
GoTo :Eof

Наверное можно сделать элегантнее. (Dir /A:-D /B заменить на Del)

[megaloman]

Немного подумал и подсократил

Код:

@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

Код:

@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

[alpap]

Может еще подумать? »

можно и сразу вывести

Код:

@echo off
for /f "tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList" /s /v "ProfileImagePath"^|find /i "C:\Users"') do echo %%b
pause

даже [/v "ProfileImagePath"] можно убрать.

[mwz]

alpap
find /i "C:\Users"

В WS2003, например, этой подстроки в данном разделе нет вообще - при том, что значение ProfileImagePath указывает на правильную папку профиля.

[DJ Mogarych]

Powershell:

Код:

$dirs = "$env:SystemDrive\Users"
$ext = "*.txt"
dir $dirs -Directory | dir -File | where Name -like $ext | Remove-Item -Confirm:$false

[alpap]

В WS2003, например, »

а как там выглядит?
ведь нужны только определенные строки содержащие ProfileImagePath и еще их надо парсить до нужного вывода.

[Iska]

а как там выглядит? »

Documents and Settings, конечно. Для пользовательских учётных записей.