Board logo

标题: [文件操作] [已解决]批次命名文件並在文件後加上該文件的建立日期 [打印本页]

作者: 我不是是人    时间: 2015-1-26 16:14     标题: [已解决]批次命名文件並在文件後加上該文件的建立日期

本帖最后由 我不是是人 于 2015-1-28 13:07 编辑

批次將某文件夾中所有文件的後面加上該文件建立日期
比如:我有 文件名稱:1.pdf  建立日期:2015-1-1
              文件名稱:2.pdf  建立日期:2015-1-2
              文件名稱:3.pdf  建立日期:2015-1-3   如此類推   
我希望可以批次將它們改成
文件名稱:1_2015-1-1.pdf
文件名稱:2_2015-1-2.pdf
文件名稱:3_2015-1-3.pdf    如此類推

希望有大神可以幫幫小弟我
感恩~
作者: 34205    时间: 2015-1-26 16:23

使用论坛搜索功能,有相关的主题帖了哦
作者: 我不是是人    时间: 2015-1-26 16:37

我看過類似的
http://www.bathome.net/viewthrea ... hlight=%C3%FC%C3%FB

不過這個是當前日期><

我想要的是文件建立的日期
作者: pcl_test    时间: 2015-1-26 17:53

回复 1# 我不是是人
一、
支持选中单个或多个文件重命名
请以管理员身份运行该批处理,因为需写入注册表,如果被杀软拦截,请选择允许运行或先退出杀软
  1. @echo off
  2. echo @echo off>"C:\Program Files\文件名添加创建日期.bat"
  3. echo for /f "skip=1 tokens=1-3 delims=-/ " %%%%a in ('dir /tc "%%1"^^^|findstr ":"') do set "getdate=%%%%a-%%%%b-%%%%c">>"C:\Program Files\文件名添加创建日期.bat"
  4. echo ren %%1 "%%~n1_%%getdate%%%%~x1">>"C:\Program Files\文件名添加创建日期.bat"
  5. reg add "HKCR\*\shell\文件名添加创建日期\Command" /ve /t REG_SZ /d "\"C:\Program Files\文件名添加创建日期.bat\" \"%%1\"" /f
  6. echo 建立“文件名添加创建日期”右键菜单成功!
  7. pause
复制代码
二、
  1. @echo off
  2. cd /d "D:\test"
  3. for /f "delims=" %%i in ('dir /a-d /b') do (
  4. for /f "skip=1 tokens=1-3 delims=-/ " %%a in ('dir /tc "%%i"^|findstr ":"') do (
  5. ren %%i "%%~ni_%%a-%%b-%%c%%~xi"
  6. )
  7. )
  8. echo 更名完成!
  9. pause
复制代码

作者: apang    时间: 2015-1-26 22:09

本帖最后由 apang 于 2015-2-2 18:21 编辑
  1. @echo off
  2. set "srcDir=D:\Test"
  3. call :Lp "%srcDir%\"
  4. pause & exit/b
  5. :Lp
  6. set "p=%~p1"
  7. set "w=wmic DataFile where "Drive='%~d1' and Path='%p:\=\\%'" get CreationDate^,Name"
  8. for /f "tokens=1*" %%a in ('%w% 2^>nul^|findstr /b [0-9]') do (
  9.         set "D=%%a"
  10.         for /f "delims=" %%c in ("%%b") do (
  11.                 set "file=%%~fc"
  12.                 set "Name=%%~nc"
  13.                 setlocal enabledelayedexpansion
  14.                 echo,ren "!file!" "!Name!_!D:~,4!-!D:~4,2!-!D:~6,2!%%~xc"
  15.                 endlocal
  16.         )
  17. )
  18. for /d %%a in ("%~1*") do call :Lp "%%a\"
复制代码

作者: CrLf    时间: 2015-1-26 22:14

  1. 1>1/* :      www.bathome.net
  2. @echo off
  3. dir /a-d /b *.txt | cscript -nologo -e:jscript "%~0"
  4. pause & exit /b
  5. */
  6. var files = WScript.StdIn.ReadAll().split(/\r\n/)
  7. var fso = new ActiveXObject("Scripting.FileSystemObject")
  8. for(var i in files){
  9. var file = fso.GetFile(files[i])
  10. var tc = new Date(file.DateCreated)
  11. file.Move(fso.GetBaseName(file.Name) + '_' + tc.getFullYear() + '-' + (tc.getMonth()+1) + '-' + tc.getDate() + '.' + fso.GetExtensionName(file.Name))
  12. }
复制代码

作者: CrLf    时间: 2015-1-26 23:57

来个 powershell
  1. dir *.pdf | ren -newname {$_.basename + $_.CreationTime.toString('_yyyy-M-d') + $_.Extension}
复制代码

作者: 我不是是人    时间: 2015-1-27 17:21

非常謝謝各位大神的熱心幫忙,小弟正在消化中(我的大腦試圖去了解內容)(腦死中)XDD
作者: pcl_test    时间: 2015-1-28 12:06

回复 8# 我不是是人
如果问题解决,请在标题最前面标上[已解决]哦




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2