neorobin

将以下代码保存的 批处理文件放在 szt 所属的父目录中

@echo off & setlocal enabledelayedexpansion

REM 备份原始日期时间格式
for /f "tokens=2*" %%a in ('reg query "HKCU\Control Panel\International" /v sShortDate^|find/i"sSh"') do set "sShortDate=%%~b"
for /f "tokens=2*" %%a in ('reg query "HKCU\Control Panel\International" /v sTimeFormat^|find/i"sTi"') do set "sTimeFormat=%%~b"

REM 修改日期时间格式
>nul reg add "HKCU\Control Panel\International" /v sShortDate /t REG_SZ /d "yyyyMMdd" /f
>nul reg add "HKCU\Control Panel\International" /v sTimeFormat /t REG_SZ /d "HH:mm:ss" /f

set "timeField=C"
set /p "timeField=请选择时间类型, 默认=!timeField! (C 创建时间; A 上次访问时间; W 上次写入的时间):"
if exist "%~dp0szt\列表文件.txt" del /f /q "%~dp0szt\列表文件.txt"
> "列表文件.txt" (
  for /f "tokens=1-3*" %%a in (
    'dir szt /a-d /od /t!timeField! /-c^|findstr "^[1-9].*[0-9][0-9]:[0-9][0-9]"') do (
    <nul set /p "=%%d|%%c|%%a|%%b"
) )
move "列表文件.txt" "%~dp0szt\"
start "" "%~dp0szt\列表文件.txt"

REM 还原原始日期时间格式
>nul reg add "HKCU\Control Panel\International" /v sShortDate /t REG_SZ /d "!sShortDate!" /f
>nul reg add "HKCU\Control Panel\International" /v sTimeFormat /t REG_SZ /d "!sTimeFormat!" /f
复制代码

neorobin

回复 3# tousyo88

17 行改为

echo,%%d^|%%c^|%%a^|%%b
复制代码

即可换行输出

文件时间的秒域输出, 未找到不利用工具或其它脚本的方法.

neorobin

谢谢 5 楼 gawk 提醒了我 wmic, 改了下

@echo off & setlocal enabledelayedexpansion

set "fn=列表文件.txt"
set "fdir=szt"

REM 备份原始日期时间格式
for /f "tokens=2*" %%a in ('reg query "HKCU\Control Panel\International" /v sShortDate^|find/i"sSh"') do set "sShortDate=%%~b"
for /f "tokens=2*" %%a in ('reg query "HKCU\Control Panel\International" /v sTimeFormat^|find/i"sTi"') do set "sTimeFormat=%%~b"

REM 修改日期时间格式
>nul reg add "HKCU\Control Panel\International" /v sShortDate /t REG_SZ /d "yyyyMMdd" /f
>nul reg add "HKCU\Control Panel\International" /v sTimeFormat /t REG_SZ /d "HH:mm:ss" /f

set "timeField=C"
set /p "timeField=请选择时间类型, 默认=!timeField! (C 创建时间; A 上次访问时间; W 上次写入的时间):"
for %%a in ("C CreationDate" "A LastAccessed" "W LastModified"
  ) do for /f "tokens=1-2" %%b in ("%%~a") do if /i %%b==!timeField! set "filetime=%%c"

if exist "%~dp0!fdir!\!fn!" del /f /q "%~dp0!fdir!\!fn!"
> "!fn!" (
  for /f "tokens=1-3*" %%a in (
    'dir !fdir! /a-d /od /t!timeField! /-c^|findstr "^[1-9].*[0-9][0-9]:[0-9][0-9]"') do (
    <nul set /p "=%%d|%%c|%%a|"
    set "pth=%~dp0!fdir!\%%d"
    for /f %%t in ('wmic datafile where name^="!pth:\=\\!" get !filetime! ^| find "."') do (
      set "ft=%%t"
      echo !ft:~8,2!:!ft:~10,2!:!ft:~12,2!
) ) )
move "!fn!" "%~dp0!fdir!\"
start "" "%~dp0!fdir!\!fn!"

REM 还原原始日期时间格式
>nul reg add "HKCU\Control Panel\International" /v sShortDate /t REG_SZ /d "!sShortDate!" /f
>nul reg add "HKCU\Control Panel\International" /v sTimeFormat /t REG_SZ /d "!sTimeFormat!" /f
exit
复制代码

neorobin

回复 12# tousyo88
WinXP CHS 32 位环境下
%%~ti 的方式也是不能输出 秒 的

下面仍使用 wmic datafile, 不受日期时间格式影响, 如果需要特定的排序方式, 可以在 16 行用 dir 适当的参数修改一下
工作目录使用全路径, 批处理文件 可以放在 除 工作目录之内 的任何地方

@echo off & setlocal enabledelayedexpansion

set "fn=列表文件.txt"
set "fdir=d:\szt" & rem 不含引号的工作目录全路径

set "timeField=C"
set /p "timeField=请选择时间类型, 默认=!timeField! (C 创建时间; A 上次访问时间; W 上次写入的时间):"
for %%a in ("C CreationDate" "A LastAccessed" "W LastModified"
  ) do for /f "tokens=1-2" %%b in ("%%~a") do if /i %%b==!timeField! set "filetime=%%c"

cd /d "!fdir!"
if exist "!fn!" del /f /q "!fn!"
if exist "TempWmicBatchFile.bat" del /f /q "TempWmicBatchFile.bat"

<nul > "!temp!\!fn!" (
  for /f "tokens=*" %%a in ('dir /b /a-d') do (
    set "pth=%%~fa"
    set /p "=%%~nxa|%%~za|"
    for /f %%t in ('wmic datafile where name^="!pth:\=\\!" get !filetime! ^| find "."') do (
      set "ft=%%t"
      echo !ft:~0,8!^|!ft:~8,2!:!ft:~10,2!:!ft:~12,2!
    )
  )
)

move "!temp!\!fn!" "!fdir!"
start "" "!fdir!\!fn!"
复制代码