Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Новый участник


Сообщения: 2
Благодарности: 0

Профиль | Отправить PM | Цитировать


Вобщем пока ждал ответа, сам разобрался, всем спасибо.

P.S. Если кому нужен аналог, готовый код: (с возможностью выбора папки через стандартный Windows-диалог)

Код: Выделить весь код
@if (@a==@b) @end /*

:: batch portion

@echo off
setlocal
ECHO ЗАПУСК...
ECHO.
ECHO Выберите папку с записями:
for /f "delims=" %%I in ('cscript /nologo /e:jscript "%~f0"') do (
    cd /d %%I
	set zapisi=%%I
)
IF "!zapisi!"=="" (
echo Вы не выбрали папку с записями.
) else (
rem cd %~dp0
@mkdir converted 2> nul
@mkdir source 2> nul
Setlocal EnableDelayedExpansion
for /f "delims=" %%i in ('dir /b /s /a-d "*.wav"') do (
	Set File=%%i
	For /F "delims=" %%A In ("!File!") Do (
		For /F "tokens=1,2,3,4,5,6,7,8,9 delims=_" %%B In ("%%~nA") Do ( 
			Set Name=%%B_%%C_%%D_%%E_%%F_%%G_%%H_
		) 
	)
	for /f "delims=" %%k in ('dir /b /s /a-d "!Name!*.wav"') do ( 
		IF "!file1!"=="" ( 
			set file1=%%k
			) else (
			set file2=%%k
			)
	)
	if exist !file1! (
		if exist !file2! (
			for %%a in (!file1!) do set file1name=%%~na
			for %%a in (!file2!) do set file2name=%%~na
			%~dp0\sox.exe -v 2.0 -m !file1! !file2! -C 48.99 converted\!file1name!.mp3 highpass 10 2 2>nul
			move /Y !file1! source\!file1name!.wav 1> nul
			move /Y !file2! source\!file2name!.wav 1> nul
			echo [OK] Saved to "\converted\!file1name!.mp3"
		)
	)
	set file1=
	set file2=
)
start explorer.exe !zapisi!
echo ВСЕ ЗАПИСИ УСПЕШНО СКОНВЕРТИРОВАНЫ
)
pause
goto :EOF

:: JScript portion */

var shl = new ActiveXObject("Shell.Application");
var folder = shl.BrowseForFolder(0, "Please choose a folder.", 0, 0x00);
WSH.Echo(folder ? folder.self.path : '');

Отправлено: 18:04, 26-10-2015 | #2