如有:
0005
0020
0036
0303
如何将以上各个字符串转换成
5
20
36
303
平台:WINXP
[ Last edited by willsort on 2006-4-10 at 12:46 ]
0005
0020
0036
0303
如何将以上各个字符串转换成
5
20
36
303
平台:WINXP
[ Last edited by willsort on 2006-4-10 at 12:46 ]
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
echo ----------------------------执行信息----------------------------
For %%a in (*.pdf) do call :name "%%a"
echo ----------------------------------------------------------------
echo 执行完毕,按任意键退出
pause >nul
exit
:name
set name="%~n1"
set name=%name:~-5%
if %name:~0,1%==0 set /a name=1%name%-10000
rename %1 %name%.pdf
echo %~n1.pdf 改名为 %name%.pdf
goto :eof
-=代码着色 BY:无奈何=-
- @echo off
- echo ----------------------------执行信息----------------------------
- for /f "delims=" %%a in (' dir /b *.pdf ') do call :name "%%a"
- echo ----------------------------------------------------------------
- echo 执行完毕,按任意键退出
- pause >nul
- exit
- :name
- set name=%~1
- ::以下两句删除下划线之前的字符
- set name=%name:*_=%
- set name=%name:*_=%
- ::以下循环可以删除前导字母和零
- :loop
- set m=%name:~0,1%
- if "%m%" LEQ "9" (
- if "%m%" GTR "0" (
- echo rename %1 "%name%"
- rename %1 "%name%" >nul
- goto :EOF
- )
- )
- set name=%name:~1%
- goto loop
- goto :EOF