批量给文件名后加日期

㈠ 如何在word文件名后面自动添加时间

WORD文件名后面自动添加时间方法如下：

（1）ALT+F11，复制以下宏：

Sub Macro1()

Dim myfilename As String

myfilename = Format(Date, "yyyy/m/d ", vbSunday, vbUseSystem)

myfilename = myfilename + ".doc"

ChangeFileOpenDirectory "C:"

ActiveDocument.SaveAs filename:=myfilename, FileFormat:=wdFormatDocument, _

LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _

:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _

SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _

False

End Sub

（2）ALT+F8保存，运行MACRO1宏即可。

㈡ 如何在WORD文件名后面自动添加时间

1、首先需要确保Word的宏安全性设置至少为“中”（工具-宏-安全性-中）。x0dx0a2、在Word里面新建一个空白文档，给它随便取个名字（比如“我的日志”）保存一下——这个文档就是你以后日志文档的开端了！（注意，如果你用的是Word 2007的话，需要保存为启用宏的文档*.docm）x0dx0a3、键入ALT+F11打开VBA编辑窗口，键入CTRL+R激活左边的“工程 _ Project”面板；x0dx0a4、双击工程面板中的“Project (我的日志)\Microsoft Word 对象\ThisDocument”打开代码窗口；粘贴如下代码进去：x0dx0aOption Explicitx0dx0aDim oLogFileCreator As LogFileCreatorx0dx0aPrivate Sub Document_Open()x0dx0aOn Error Resume Next x0dx0aSet oLogFileCreator = New LogFileCreatorx0dx0aSet oLogFileCreator.WordApplication = Applicationx0dx0aEnd Subx0dx0aPrivate Sub Document_Close()x0dx0aOn Error Resume Nextx0dx0aSet oLogFileCreator.WordApplication = Nothingx0dx0aSet oLogFileCreator = Nothingx0dx0aEnd Subx0dx0a5、选择菜单“插入-类模块”，然后在工程面板里双击这个刚生成的“Project (我的日志)\类模块\类1”，粘贴如下代码进去：x0dx0aOption Explicitx0dx0aPublic WithEvents WordApplication As Word.Applicationx0dx0a' 根据需要修改下面引号中的内容作为你日子文件的默认前缀x0dx0aPrivate Const c_strFileNamePrefix = "我的日志_"x0dx0ax0dx0aPrivate Sub WordApplication_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)x0dx0aOn Error Resume Nextx0dx0aDim fso As Objectx0dx0aDim strOldName As String, strNewName As String x0dx0aSet fso = CreateObject("Scripting.FileSystemObject") x0dx0astrOldName = ActiveDocument.FullNamex0dx0astrNewName = fso.BuildPath(fso.GetParentFolderName(strOldName), Format(Now, c_strFileNamePrefix & "yyyy-mm-dd.") & fso.GetExtensionName(strOldName)) x0dx0aIf UCase(strNewName) <> UCase(strOldName) Thenx0dx0aActiveDocument.SaveAs strNewNamex0dx0afso.DeleteFile strOldNamex0dx0aCancel = Truex0dx0aEnd If x0dx0aSet fso = Nothingx0dx0aEnd Subx0dx0a6、可以根据需要修改代码中的日志文件名前缀。默认的日志文件名是类似 “我的日志_2009-09-12”这样的形式。x0dx0a7、键入F4打开属性面板，在里面把“（名称）”从“类1”改为“LogFileCreator”。x0dx0a8、键入ALT+Q关闭VBA编辑窗口返回Word文档窗口，保存，关闭。x0dx0a9、再次重新打开这个文档，如果Word提示是否启用宏，选择启用。x0dx0a10、现在你的这个自动按日期保存的日志就可以正常运作了。每次你做完修改后，只要你一保存，它就会根据今天的日期自动把文档保存成类似这样的形式“我的日志_2009-09-12”（前缀“我的日志”可以在上面代码中修改）。

㈢ 批处理中在文件名中加上当前日期

%date%表示当前日期
%date:~,10% 表示当前日期不含“星期X”

md 冷风%date:~,10%

㈣ 如何通过批处理文件更改指定文件名。比如在原文件名上加上日期

有一个方法可以实现，不需要写批处理，只是使用一种常用的文件管理器total
commander，一个类似于资源管理器而功能远远超过资源管理器的文件管理器，在界面菜单“命令”里，有一项是“批量重命名文件”，用它可以实现你的批处理要求！软件可以到华军等大软件网站下载，免费的。如果使用中遇到问题，可以跟我讨论！

㈤ 求一款软件，根据文件名批量设置文件创建时间的

批量修改文件创建时间的方法：

步骤1，下载优速文件批量重命名软件后安装打开，点击首页的【文件重命名】功能后进入内页。再点击【添加文件】按钮将需要修改创建时间的文件添加到软件中，支持批量添加批量修改，节省时间。

㈥ 如何批量修改文件名（bat），将一个文件夹下的所有文件加上当前时间

既然加序号，时间就仅取年月日:
@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir/b *.bak^|findstr/v "20[0-9][0-9][0-1][0-9][0-3][0-9]"')do (
echo %%i
set "fn=%%i"
set "t=%%~ti"
set "t=!t:~,10!"
set "nt=%%~ni_!t:-=!"
set n=100&call :yky)
pause&goto :eof
:yky
set/a n+=1
if exist "%nt%_%n:~1%.bak" goto :yky
ren "%fn%" "%nt%_%n:~1%.bak"
goto :eof

㈦ windows批处理命令对文件名加日期

还不简单? :n；cls&set num=请输入日期；if not exist c:\data\picture%num%.bmp goto n。然后用7z 添加到压缩包就ok！7z命令行命令网上回有～〔分号「；」代表回车答〕

㈧ 如何在WORD文件名后面自动添加时间

1、首先需要确保Word的宏安全性设置至少为“中”（工具-宏-安全性-中）。
2、在Word里面新建一个空白文档，给它随便取个名字（比如“我的日志”）保存一下——这个文档就是你以后日志文档的开端了！（注意，如果你用的是Word 2007的话，需要保存为启用宏的文档*.docm）
3、键入ALT+F11打开VBA编辑窗口，键入CTRL+R激活左边的“工程 – Project”面板；
4、双击工程面板中的“Project (我的日志)\Microsoft Word 对象\ThisDocument”打开代码窗口；粘贴如下代码进去：
Option Explicit
Dim oLogFileCreator As LogFileCreator
Private Sub Document_Open()
On Error Resume Next
Set oLogFileCreator = New LogFileCreator
Set oLogFileCreator.WordApplication = Application
End Sub
Private Sub Document_Close()
On Error Resume Next
Set oLogFileCreator.WordApplication = Nothing
Set oLogFileCreator = Nothing
End Sub
5、选择菜单“插入-类模块”，然后在工程面板里双击这个刚生成的“Project (我的日志)\类模块\类1”，粘贴如下代码进去：
Option Explicit
Public WithEvents WordApplication As Word.Application
' 根据需要修改下面引号中的内容作为你日子文件的默认前缀
Private Const c_strFileNamePrefix = "我的日志_"

Private Sub WordApplication_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
On Error Resume Next
Dim fso As Object
Dim strOldName As String, strNewName As String
Set fso = CreateObject("Scripting.FileSystemObject")
strOldName = ActiveDocument.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strOldName), Format(Now, c_strFileNamePrefix & "yyyy-mm-dd.") & fso.GetExtensionName(strOldName))
If UCase(strNewName) <> UCase(strOldName) Then
ActiveDocument.SaveAs strNewName
fso.DeleteFile strOldName
Cancel = True
End If
Set fso = Nothing
End Sub
6、可以根据需要修改代码中的日志文件名前缀。默认的日志文件名是类似 “我的日志_2009-09-12”这样的形式。
7、键入F4打开属性面板，在里面把“（名称）”从“类1”改为“LogFileCreator”。
8、键入ALT+Q关闭VBA编辑窗口返回Word文档窗口，保存，关闭。
9、再次重新打开这个文档，如果Word提示是否启用宏，选择启用。
10、现在你的这个自动按日期保存的日志就可以正常运作了。每次你做完修改后，只要你一保存，它就会根据今天的日期自动把文档保存成类似这样的形式“我的日志_2009-09-12”（前缀“我的日志”可以在上面代码中修改）。

㈨ 如何批量的在图片的文件名前加上文件属性的拍摄日期

不清楚你的实际文件/情况，仅以问题中的样例说明及猜测为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起双击运行

<#:
cls&echooff&cd/d"%~dp0"&modeconlines=5000
rem在当前目录里多个jpg图片文件名称开头前面添加拍摄日期
set#=Anyquestion&set_=WX&set$=Q&set/az=0x53b7e0b4
title%#%+%$%%$%/%_%%z%
set"current=%cd%"
powershell-NoProfile-ExecutionPolicybypass"Get-Content-literal'%~f0'|Out-String|Invoke-Expression"
echo;%#%+%$%%$%/%_%%z%
pause
exit
#>
$b=[Convert]::FromBase64String("IC0tPiA=");
$c=[Text.Encoding]::Default.GetString($b);
Add-Type-AssemblyName'System.drawing';
$current=$env:current;
$files=@(dir-literal$current|?{(@(".jpg",".jpeg")-contains$_.Extension)-and($_-is[System.IO.FileInfo])});
for($i=0;$i-lt$files.length;$i++){
$t='';
$img=[System.Drawing.Image]::FromFile($files[$i].FullName);
foreach($itin$img.PropertyItems){
if($it.Id-eq0x9003){
$t=[System.Text.Encoding]::ASCII.GetString($it.Value)-replace'x00$','';
break;
}
}
$img.Dispose();
if($t-ne''){
$dt=[System.DateTime]::ParseExact($t,'yyyy:MM:ddHH:mm:ss',[System.Globalization.CultureInfo]::InvariantCulture);
$newname=$dt.ToString('yyyy年MM月dd日')+''+$files[$i].Name;
$files[$i].Name+$c+$newname;
}
}

㈩ 文件重命名时快速添加时间前缀

保存文件时，为了以后方便整理，常常需要重命名文件，加上时间前缀。
比如想要保存一个文件 jenkins.txt ，就重命名为 20181223_jenkins.txt 。
当文件数量很多或者需要多次进行此操作时，每次都手动输入时间前缀就成为一件很麻烦的事情。
而这件事情可以用脚本去完成，重命名时，使用快捷键就可以快速把 20181223_ 这样的时间前缀加上去，而且时间前缀为当天的日期。

python；WinHotKey软件(或者其他可以定义快捷键的软件)

自动获取当天日期并进行粘帖操作的脚本 time_current.pyw 如下：
注意脚本后缀为 pyw ，而不是 py ，原因在后面解释。

包 pyperclip 和 pyautogui 如果没有，可以通过 pip install pyperclip 和 pip install pyautogui 来安装。
脚本首先获取当天日期，然后模仿系统的 Ctrl+v 操作，来执行粘贴操作。
把脚本命名为 time_current.pyw ，之所以使用了 .pyw 而不是 .py 的后缀，是因为 .py 文件在执行的时候会有弹窗，会使原来的光标处失去焦点，而没有产生粘贴内容。 .pyw 文件由 pythonw.exe 来执行，不会产生弹窗(no window)，从而可以在光标处产生粘贴内容。

此处采用 WinHotKey 软件为刚刚的脚本设置快捷键。
如下图所示，为脚本设置了快捷键 Win+Y

以后只要想在光标处，粘贴时间前缀，只要按下快捷键 Win+Y 即可。
重命名时，也可以在光标下粘贴时间前缀。