[Iska]

Вы гений, а для меня это какая-то абракадабра. »

Отнюдь. Вы неправы в обеих частях утверждения. Не боги горшки обжигают.

напишите еще вот такой "генратор" »

Попробуйте так:

читать дальше »

Код:

@echo off
setlocal enableextensions enabledelayedexpansion
set sPath=%~dp0
call :GetLastPartOfPath "%sPath:~0,-1%"

1>nul chcp 1251
>"%LastPartOfPath%.m3u" (
	echo #EXTM3U
	for /f "usebackq delims=" %%i in (`dir /s /o:n /b *.wav *.flac *.mp3 2^>nul`) do (
		echo #EXTINF:-1,
		set sFullPath=%%~i
		echo !sFullPath:%sPath%=!
	)
)
1>nul chcp 866

endlocal
exit /b 0

:GetLastPartOfPath
	setlocal enableextensions enabledelayedexpansion
	set sOut=%~0
	
	endlocal & set %sOut:~4%=%~nx1
	exit /b

Как Вас отблагодарить? »

Судят старого цыгана…

читать дальше »

Дают ему последнее слово. Он и говорит:

— Просит прокурор пятнадцать — дайте ему пятнадцать, просит защитник пять — дайте ему пять, обещает судья десять — дайте ему десять. А мне ничего не надо, я не жадный…

Спросите у Администрации, может им чего сгодится.