我有一个脚本,可以读取远程目录中的所有文件,并将文件对象设置为最旧的文件。然后,它将该文件的创建/修改日期写入另一个文件。
问题:它以一种奇怪的格式写入日期- 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有谁知道怎样才能得到我想要的格式?
发布于 2013-11-12 20:40:17
根据this site的说法
objFileHandle.Write(FormatDateTime(recentFile.DateLastModified, vbShortDate))应该能给你想要的东西。
当然,除非您谈论的是基于区域设置的格式化?另请参阅此问题:VBS objFile.DateLastModified and Date Format Settings及其答案
https://stackoverflow.com/questions/19929199
复制相似问题