如何批量以文件名创建文件夹，再将文件放入文件夹？

不清楚你的实际文件/情况，仅以问题中的样例/说明为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起运行
/*&cls
@echo off
rem 将文件名称去掉/删除末尾的数字序号后相同的文件剪切/移动到同一个文件夹里
mode con lines=3000
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
for /f "tokens=1* delims=|" %%a in ('dir /a-d/b^|cscript -nologo -e:jscript "%~f0"') do (
if /i "%%~xa" neq ".bat" (
if not exist "%%b\" md "%%b\"
echo;"%%a" --^> "%%b\"
)
)
echo;%#% +%$%%$%/%@% %z%
pause
exit
*/
var fso=new ActiveXObject('Scripting.FileSystemObject');
while(!WSH.StdIn.AtEndOfStream){
var line=WSH.StdIn.ReadLine();
var file=fso.GetFile(line);
var oldbase=fso.GetBaseName(file.Path);
var newbase=oldbase.replace(/\s*[（\(]\d+[\)）]$/,'');
WSH.echo(line+'|'+newbase);
}