用批处理bat.如何在指定目录当前日期的文件夹中新建一个文件夹，文件夹的名字为粘贴板内容，并且打开？

您可以使用以下批处理脚本实现这个功能：

@echo off

setlocal

REM 设置要创建文件夹的目录路径

set "folder_path=C:\example\%date:~0,4%-%date:~5,2%-%date:~8,2%"

REM 检查文件夹是否存在，如果不存在则创建它

if not exist "%folder_path%" ( mkdir "%folder_path%"

)

REM 获取剪贴板的内容并将其作为文件夹名称

set /p "folder_name=" <"con"

md "%folder_path%\%folder_name%"

REM 打开新创建的文件夹

start "" "%folder_path%\%folder_name%"

编码设为ANSI后保存脚本

@echo off & title 获取文件名，修改时间，并记录到表格中 By 依梦琴瑶

cd /d "%~dp0"

::设置要处理的文件夹

set SrcDir=D:\MyFolder

::设置要处理的文件格式，全部格式请直接用*

set Ext=*

::设置是否包含子目录，是=1，否=其它任何非1的字符

set Sub=0

::保存的表格文件名

set Excel=文件列表表格.xlsx

if "%Sub%"=="1" set "S=/s"

pushd "%SrcDir%"

echo 正在获取中，请耐心等待。。。

(echo "文件名","修改时间"

for /f "delims=" %%a in ('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

(echo Set oExcel = CreateObject("Excel.Application"^)

echo oExcel.Workbooks.Open "%tmp%\MyFilesListTemp.csv"

echo oExcel.ActiveSheet.Columns("A:O"^).Select

echo oExcel.Selection.EntireColumn.AutoFit

echo oExcel.ActiveWorkbook.SaveAs "%~dp0%Excel%",51

echo oExcel.Quit)>"%tmp%\Csv2Xlsx.vbs"

del /f /q "%~dp0%Excel%" 2>nul

"%tmp%\Csv2Xlsx.vbs"

goto :eof

---