如何在Windows中用“修改日期”覆盖文件的“创建日期”?

时间:2015-12-23 01:01:05

标签: file date batch-file command-line attributes

我有一个folder full of files,其日期修改时间正确,但创建的日期不正确。我想将dateCreated文件属性设置为修改日期的时间。

我对解决方案最接近的是一个批处理文件,它将修改日期的时间设置为创建文件的时间(https://stackoverflow.com/a/24951475/2780666),但我想做相反的事情。如果可能,我该怎么做?

1 个答案:

答案 0 :(得分:0)

假设您找到的脚本有效,我会尝试以下操作。

@if (@This==@IsBatch) @then
@echo off
rem **** batch zone *********************************************************

setlocal enableextensions disabledelayedexpansion
set "targetFolder=%~1"
if not defined targetFolder set "targetFolder=%cd%"

rem call javascript part of batch file
cscript //nologo //e:Javascript "%~f0" /startFolder:"%targetFolder%"

rem End of batch area. End batch execution before reaching js zone
endlocal
exit /b

@end
// **** Javascript zone *****************************************************

if (!WScript.Arguments.Named.Exists('startFolder')) {
    // if no start folder is given, leave
    WScript.Quit(1);
};

// retrieve start folder
var startFolder = WScript.Arguments.Named.Item('startFolder');

// instantiate needed components
var fso = WScript.CreateObject('Scripting.FileSystemObject');
var shell = WScript.CreateObject('Shell.Application');

// recursive function to set the ModifyDate to the CreationDate
(function processFolder( folderPath ){
    // test for valid paths
    folderPath = fso.GetAbsolutePathName((folderPath || '' ));
    if (!fso.FolderExists(folderPath)) return ;
    // retrieve a reference to the folder namespace
    var folderNS = shell.NameSpace(folderPath);
    // process files inside this folder
    for (var files = new Enumerator(fso.GetFolder( folderPath ).Files ); !files.atEnd() ; files.moveNext()){
        var file = files.item();
        WScript.StdOut.WriteLine( file.Path );
        folderNS.ParseName( file.Name ).DateCreated = file.ModifyDate;
    };
    // process files under child folders
    for (var folders = new Enumerator(fso.GetFolder( folderPath ).SubFolders); !folders.atEnd() ; folders.moveNext()){
        processFolder( folders.item().Path );
    };
})( startFolder );

WScript.Quit(0);
相关问题