[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

10元求修改批处理实现照片改名

  1. @echo off
  2. for /d %%a in (*) do (
  3.     setlocal enabledelayedexpansion
  4.     for /f "delims=" %%b in ('dir /a-d/b "%%a\*.jpg"') do (
  5.         set /a n+=1
  6.         ren "%%a\%%b" "QLR_000!n!%%~xb"
  7.     )
  8.     endlocal
  9. )
  10. pause
复制代码

帮忙修改一下这个,我要指定修改QLR文件夹里的相片,我现在有2000个文件夹,每个文件夹里面有4个子文件夹,分别是FW,QT,QLR,DA  现在我要把所有QLR文件夹里的照片改名,改成QLR_0001,QLR_0002这样类型的

TOP

求大佬帮帮忙

TOP

  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /d %%a in (*) do (
  4.     set n=10000
  5.     for /f "delims=" %%b in ('dir /a-d /b "%%a\QLR\*.jpg"') do (
  6.         set /a n+=1
  7.         ren "%%a\QLR\%%b" "QLR_!n:~-4!%%~xb"
  8.     )
  9. )
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

本帖最后由 yhcfsr 于 2018-12-11 20:44 编辑
  1. @echo off&setlocal enabledelayedexpansion
  2. (for /r /d %%a in (QLR) do if exist "%%a" (
  3. set "n=10000"
  4. pushd "%%a"
  5. for /r %%b in (*) do (
  6. set/a "n+=1"
  7. echo;%%b %%~nxa_!n:~-4!%%~xb
  8. ren "%%b" "%%~nxa_!n:~-4!%%~xb"
  9. )
  10. popd
  11. ))>重命名日志.LOG
  12. pause
复制代码
QQ 33892006

TOP

此人为骗子,两次未曾付款于我,各位看着办吧
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

其实完全不必发有偿贴,论坛热心人很多,区区几十块大家也不会放在心上.
不过既然标为有偿,即使是1毛钱,也是事关诚信,必须得付.
题主如果采纳并付款,请截图贴出来.
建议管理员跟进此贴.
QQ 33892006

TOP

哈哈哈,过来人,很久以前经历过一次,我就没再认真对待这种“有偿帖”了。
主要是显得很 —— 掉价。

TOP

回复 8# 523066680


  您这么一说,真让我汗颜啦.
  想一想,确实是这么回事.
  是我失态了
QQ 33892006

TOP

此人为骗子,两次未曾付款于我,各位看着办吧
zaqmlp 发表于 2018-12-11 21:03



    遇到过这种人……

TOP

返回列表