Bat时间文件夹
① bat 按时间创建文件夹,还有点疑问
还是试试我的吧:
::══代══码══开══始═══
@echo
off
set
a=%date:~0,10%_
set
b=%TIME:~0,2%
if
%TIME:~0,2%
leq
9
(set
b=0%TIME:~1,1%)else
set
b=%TIME:~0,2%
set
c=-%TIME:~3,2%-%TIME:~6,2%
echo
"%a%%b%%c%"
md
"%a%%b%%c%"
pause
::Coded
By
escortmnm
from
vbs团队
::══代══码══结══束═══
从你的代码修改来的,当小于等于9的时候截取小时数的最后一位数。
② 用BAT导出文件夹内所有文件名和修改时间,格式为EXCEL,不要完整路径怎么弄
编码设为ANSI后保存脚本
@echooff&title获取文件名,修改时间,并记录到表格中By依梦琴瑶
cd/d"%~dp0"
::设置要处理的文件夹
setSrcDir=D:MyFolder
::设置要处理的文件格式,全部格式请直接用*
setExt=*
::设置是否包含子目录,是=1,否=其它任何非1的字符
setSub=0
::保存的表格文件名
setExcel=文件列表表格.xlsx
if"%Sub%"=="1"set"S=/s"
pushd"%SrcDir%"
echo正在获取中,请耐心等待。。。
(echo"文件名","修改时间"
for/f"delims="%%ain('dir/a-d%S%/b/tw%Ext%2^>nul')do(
echo"%%~nxa","%%~ta"
))>"%tmp%MyFilesListTemp.csv"
popd
call:WriteXLSXFile
cls&echo文件列表表格生成完毕,请在脚本同目录下查看“%Excel%”。
pause
exit
:WriteXLSXFile
(echoSetoExcel=CreateObject("Excel.Application"^)
echooExcel.Workbooks.Open"%tmp%MyFilesListTemp.csv"
echooExcel.ActiveSheet.Columns("A:O"^).Select
echooExcel.Selection.EntireColumn.AutoFit
echooExcel.ActiveWorkbook.SaveAs"%~dp0%Excel%",51
echooExcel.Quit)>"%tmp%Csv2Xlsx.vbs"
del/f/q"%~dp0%Excel%"2>nul
"%tmp%Csv2Xlsx.vbs"
goto:eof
③ bat 按时间创建文件夹
试试我的:
::══代══码══开══始═══
@echo off
title %date% %time:~,8% by escortmnm
set abc=%date:~0,4%%date:~5,2%%date:~8,2%%time:~0,2%%time:~3,2%
md d:\xxx\%abc%
/y a.txt d:\xxx\%abc%
pause
::Coded By escortmnm from vbs团队
::══代══码══结══束═══
④ 怎么创建是以时间命名的bat文件夹并保留当天文件夹删除前一天的文件夹
用批命令进行运算是很麻烦的。因此不建议在一个批命令里处理两个日期数据。可以前一天23点59分就删除当天文件夹,0点过后建立新的当天文件夹。 0点前执行删除文件夹批命令,语句:deltree -y %DATE:~0,10% 0点后执行建立文件夹批命令,语句rd %DATE:~0,10%
⑤ 怎么创建是以时间命名的bat文件夹并保留当天文件夹删除前一…
和楼上的答案类似。
代码:
@echo off
@if not exist "%date%" md "%date%"
::以日期为名创建文件夹。
@dir ????-??-???星期? /a:d /b>.txt
::罗列本目录下所有日期格式命名的子目录到.txt文件里面。
@for /f "delims=*" %%a in (.txt) do if not "%%a"=="%date%" rd /s /q "%%a"
::删除其他文件夹。
del .txt /a /f /q
::删除.txt文件。