[amel27]

хотелось получить переменные вида »

гм, не вижу в этом смысла... впрочем, вам видней

Код:

@echo off
SetLocal EnableDelayedExpansion

Set $RKEY="HKCU\Software\1C\1Cv7\7.7\Titles"
Set $iMAX=0

For /F "Tokens=1,3 Delims=	" %%i In ('Reg Query %$RKEY% /s^|Find "REG_SZ"') do (
	Set /A $iMAX +=1
	Set $PATH=%%i
	Set $NAME!$iMAX!=%%j
	Set $PATH!$iMAX!=!$PATH:~4!
)

CALL :DISPLAY %$iMAX%
EXIT

:DISPLAY
	Set $iNUM=%1
:LOOP
	@echo.
	@echo $PATH%$iNUM%=!$PATH%$iNUM%!
	@echo $NAME%$iNUM%=!$NAME%$iNUM%!
	
	Set /A $iNUM-=1
	If %$iNUM% GTR 0 GOTO :LOOP
	GOTO :EOF
)