[文件操作] 请帮着修改BAT代码拖放文件夹修改文件名

dzwind

请各位大师帮忙看看以下的代码，我用AI做的，但执行不了，提示找不到文件。谢谢。
要求1、建好BAT文件后，以拖动文件夹至该BAT程序上执行
2、程序会将目录下的所有的docdocx文件改名，文件名称起以保留前2个字符，后面以时间的文件名。
想建的BAT内容如下：

set /a folder=%1
pushd %folder%
for /r. %%f in (*.doc *.docx) do (
    set filename=%%~nf
    set newfilename=!filename:~0,2!-%date%.%ext!
    ren "%%f" "%newfilename%"
)
popd
echo 改名完成!
复制代码

dzwind

谢谢楼上各位大师的无私帮助