[megaloman]

NuclearBox, Мне привычнее RAR, на примере WinRar

Код:

@Echo Off
Set Mask="*.zip" "*.rar" 
Set "ARC="C:\Program Files\WinRAR\WinRAR.exe" x"

FOR %%f IN (%Mask%) DO (
	Md "%%~nf" 2>nul
	%ARC% "%%f" "%%~nf\" 
)