0

我正在尝试将目录中最旧文件的修改日期写入文本文件。目前我可以按最旧到最新的顺序编写所有文件名(我将它们命名为它们的创建日期),但似乎无法将其限制为仅输出最旧的或确实获得修改或创建的日期/时间。我的目录是远程的,以防它产生差异,我当前的尝试如下:

dir "\\dirxxxx\xxxxxxx\xxxxx\xxxxx\xxxxx\*.*" /b /a-d /o-d`

有什么想法可以获取写入同一目录中文本文件的文件的创建或修改日期吗?

4

2 回答 2

3

尝试这个:

for /f "delims=" %i in ('dir /b/o-d/a-d') do set "oldesttime=%~ti"
>"log.txt" echo %oldesttime%
于 2013-07-03T11:48:40.827 回答
0

解决方案:改用vbs。

Option Explicit  
Dim fso, path, file, recentDate, recentFile, objFileHandle
Set fso = CreateObject("Scripting.FileSystemObject")
Set recentFile = Nothing
For Each file in fso.GetFolder("\\xxxxxx\xxxxxxx").Files
  If (recentFile is Nothing) Then
    Set recentFile = file
  ElseIf (file.DateLastModified < recentFile.DateLastModified) Then
    Set recentFile = file
  End If
Next

If recentFile is Nothing Then
  WScript.Echo "no recent files"
Else
  WScript.Echo recentFile.DateLastModified

  Set objFileHandle = fso.OpenTextFile("\\Vxxxxxx\xxxxx", 2, "True")
  objFileHandle.Write(recentFile.DateLastModified)
  objFileHandle.Close
End If
于 2013-07-05T11:30:34.123 回答