[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 2# Batcher


    forfiles /p "E:\一键数据副本" /s /m *.csv /d -30 /c "cmd /c del @path /q /f"
用的这个,超过30天的就删除



不好意思 ,之前那个帐号,密码忘记了,重新注册了一个

TOP

本帖最后由 kangkangsz 于 2021-4-7 09:47 编辑

回复 3# thp2008


    大神,我复制了代码试了下,是把后缀嵊这SP1吗?用不了啊
复制代码后生成PS1文件 ,以POWERSHELL运行,屏幕一闪而过就没了

TOP

DERA ALl:
       另一个大神写了代码,如下请参考。

<# :
cls
@echo off
rem 将指定目录下修改日期在指定日期之前的文件按照原来的目录结构复制/拷贝到另一个目录里
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]:efault))) -Args '%~dp0'"
echo;努力的你,很可爱,加油!
pause
exit
#>
   
$oldfolder='E:\桌面文件';
$newfolder='F:\456';
$agodate=20210601;
if(-not (test-path -liter $oldfolder)){write-host ('"'+$oldfolder+'" not found');exit;};
$files=@(dir -liter $oldfolder -recurse|?{$_ -is [System.IO.FileInfo]});
for($i=0;$i -lt $files.length;$i++){
    if([int]$files[$i].LastWriteTime.toString('yyyyMMdd') -lt $agodate){
        $newpath=$newfolder.trimend('\')+$files[$i].Directory.FullName.Substring($oldfolder.trimend('\').length);
        $newfile=$newpath+'\'+$files[$i].Name;
        if(-not (test-path -liter $newpath)){[void](md $newpath -force);};
        write-host ($files[$i].FullName+' --> '+$newpath);
        cp -liter $files[$i].FullName $newfile -force;
    };
};
若提示 powershell不是外部、内部命令,也不是可运行的程序或批处理文件, 可能是你的电脑系统属于阉割版,建议换台电脑试
若提示 红字,或绿字 可能是代码复制不完整

TOP

返回列表