xp3000

@if (0)==(0) echo off
rem 保存为ANSI编码

:start
cls 
echo   1、【原点印务】
echo   2、【百姓印务】
echo   3、【鑫金星：760】
echo   4、【鑫金星：1030】
echo   5、【雅美高】
echo   6、【华印汇彩】
echo   7、【华美丰：460】
echo   8、【华美丰：620】
echo   9、【华美丰：920】
echo  10、【添加自定义文字】
echo  00、【撤销添加的前缀】
echo.
set/p p=请选择[1/2/3/4/5/6/7/8/9/10/00]:
echo.
if %p%==1 set "var1=1030_790_原点印务__文件名：" & goto to
if %p%==2 set "var1=1030_800_百姓印务__文件名：" & goto to
if %p%==3 set "var1=760_605_鑫金星__文件名：" & goto to
if %p%==4 set "var1=1030_800_鑫金星__文件名：" & goto to
if %p%==5 set "var1=1030_790_雅美高__文件名：" & goto to
if %p%==6 set "var1=910_665_华印汇彩__文件名：" & goto to
if %p%==7 set "var1=460_395_华美丰__文件名：" & goto to
if %p%==8 set "var1=620_485_华美丰__文件名：" & goto to
if %p%==9 set "var1=920_760_华美丰__文件名：" & goto to
if %p%==10 set /p "var1=添加自定义文字：" & goto to
if %p%==00 set /p "var2=撤销添加的前缀：" & goto to
goto start

:to
dir /b "*.pdf" | cscript //nologo //e:jscript "%~0" "%var1%" "%var2%"
pause & goto :EOF
@end

fso = new ActiveXObject("Scripting.FileSystemObject");

while(!WScript.StdIn.AtEndOfStream){
var name = WSH.StdIn.ReadLine();
if (WSH.Arguments(1) === '') {
    str = name.match(WSH.Arguments(0))
if (str === null) {
    Newname = WSH.Arguments(0) + name;//添加内容
    if (!fso.FileExists(Newname)) {fso.MoveFile(name, Newname);}
    WSH.echo('新文件名：' + Newname);
    }
} else {
    Newname = name.replace(WSH.Arguments(1), "");//删除内容
    if (!fso.FileExists(Newname)) {fso.MoveFile(name, Newname);}
    WSH.echo('新文件名：' + Newname);
}
}
WSH.echo("批量处理完成");
复制代码

xp3000

保存为ANSI编码的BAT

@if (0)==(0) echo off
dir /b "*.pdf" | cscript //nologo //e:jscript "%~0"
pause & goto :EOF
@end

fso = new ActiveXObject("Scripting.FileSystemObject");
while(!WScript.StdIn.AtEndOfStream){
var name = WSH.StdIn.ReadLine();
var str = name.match(/已处理/);
if (!str) {
    Newname = "待处理 " + name.replace(/(待处理 *)+/g, '');
if (!fso.FileExists(Newname)) {
    fso.MoveFile(name, Newname);
    WSH.Echo(Newname);
    }}
}
复制代码

补发一个昨天漏掉的问题