Question

我有一个脚本，它读取远程目录中的所有文件，并将文件对象设置为最旧的文件。然后它将该文件的创建/修改日期写入另一个文件。

问题：它以奇怪的格式写日期 - yyyy-dd-mm hh：mm：ss 我想要格式yyyy-mm-dd hh：mm：ss

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

Set objFileHandle = fso.OpenTextFile("\\remoteServer\Drive\Folder\oldestDateTime.Txt", 2, "True")
objFileHandle.Write(recentFile.DateLastModified)
objFileHandle.Close

任何人都知道如何获得我想要的格式？

Answer 1

根据this site

objFileHandle.Write(FormatDateTime(recentFile.DateLastModified, vbShortDate))

应该采取某种方式给你你想要的东西。

当然，除非您在谈论基于区域设置的格式化？另请参阅此问题：VBS objFile.DateLastModified and Date Format Settings及其答案

写脚本的VB脚本给出了错误的格式

1 个答案: