批处理如何删除某目录下的固定文件夹中指定日期的规则文件？[结帖] - BAT求助&讨论 - 批处理之家 BAT,CMD,批处理,PowerShell,VBS,DOS

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

16楼 跳转到 »

发表于 2013-4-14 21:36 | 只看该作者

回复 14# BAT-VBS

我弄了，打开提示无可用范例
后来把enable那行去掉，提示

错误:
代码 = 0x80041017
说明 = 无效查询
设备 = WMI
错误:
代码 = 0x80041017
说明 = 无效查询
设备 = WMI

terse

中将

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

17楼

发表于 2013-4-14 23:10 | 只看该作者

回复 16# lky216
不行的话只能FOR里比较文件时间后 DEL

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

18楼

发表于 2013-4-14 23:13 | 只看该作者

回复 17# terse

主要是跳过doc这个目录不要搜索这个目录
其他的我就不懂了，我是小白，

terse

中将

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

19楼

发表于 2013-4-15 00:06 | 只看该作者

回复 18# lky216
这个呢？
代码如正常显示去掉最后的 ECHO
运行前先备份

@echo off
set "fd=20130415000000"
set "d=d:"
set "p=\user\"
set "ext=log"
for /f "tokens=*" %%p in ('dir /b /ad "%d%%p%"') do (
    for /f "skip=1 tokens=1*" %%i in ('wmic datafile where "drive='%d%' and path='%p:\=\\%%%p\\log\\' and FileName like 'ex%%' and extension='%ext%'" get name^,LastModified') do (
        for /f "tokens=1,2* delims=. " %%a in ("%%i %%j") do (
           if "%%a" lss "%fd%" echo del "%%~fc"
        )
    )
)
pause
复制代码

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

20楼

发表于 2013-4-16 08:40 | 只看该作者

回复 19# terse

十分感谢。如遇特殊情况需要再次麻烦您修改的，可以付费。

BAT-VBS

少将

Rank: 8 Rank: 8

帖子: 888
积分: 6682
技术: 88
捐助: 0
注册时间: 2012-10-27

21楼

发表于 2013-4-16 13:16 | 只看该作者

回复 20# lky216

下次去『有偿求助区』发帖吧

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

22楼

发表于 2013-4-16 14:02 | 只看该作者

本帖最后由 lky216 于 2013-4-16 14:11 编辑

回复 19# terse
没去掉echo的话，是正常的。中文的:"复件 ex20130415.log"就没有被删除，这个大概知道，是只查找英文的，我这边也是全英文的ex*.log

另外，把我批处理的同级目录文件删除了，在盘符根目录的三四个文件都删除了。去掉echo的话。- -

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

23楼

发表于 2013-4-16 14:03 | 只看该作者

本帖最后由 lky216 于 2013-4-16 14:41 编辑

回复 21# BAT-VBS

不好结算。说给*元，怕到时候要修改。如果运行的时候，没有满足所说的功能的话，要修改

BAT-VBS

少将

Rank: 8 Rank: 8

帖子: 888
积分: 6682
技术: 88
捐助: 0
注册时间: 2012-10-27

24楼

发表于 2013-4-16 14:16 | 只看该作者

回复 23# lky216

改功能就加钱呗
功能没实现就减钱或者不给钱呗
这有什么不好结算的
你发帖时说给50，最后你愿意给500，又不会有人拦着你。

terse

中将

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

25楼

发表于 2013-4-16 14:35 | 只看该作者

回复 22# lky216
你什么环境按理 ECHO 正常的话不会删除同级目录下文件 WMIC 处理 NAME 是绝对路径的
方便的话贴下 ECHO 结果

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

26楼

发表于 2013-4-18 16:10 | 只看该作者

回复 25# terse

最近忙死了。。。不好意思，一会我这边测试看看下给您回复。

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

27楼

发表于 2013-4-30 15:47 | 只看该作者

本帖最后由 lky216 于 2013-4-30 16:05 编辑

回复 25# terse

文件夹 PATH 列表
卷序列号为 E094-8C28
C:.
│  1.txt
│
└─user
│  新建文本文档.txt
│
├─liky
│  │  新建文本文档.txt
│  │
│  ├─doc
│  └─log
│       ex20130430.log
│
└─wxh
      │  新建文本文档.txt
      │
      ├─doc
      │    新建文本文档.txt
      │
      └─log
            ex20130430.log
         代码

@echo off
setlocal enabledelayedexpansion
set "fd=20130501000000"
set "d=c:"
set "p=\user\"
set "ext=log"
for /f "tokens=*" %%p in ('dir /b /ad "%d%%p%"') do (
    for /f "skip=1 tokens=1*" %%i in ('wmic datafile where "drive='%d%' and path='%p:\=\\%%%p\\log\\' and FileName 

like 'ex%%' and extension='%ext%'" get name^,LastModified') do (
        for /f "tokens=1,2* delims=. " %%a in ("%%i %%j") do (
           if "%%a" lss "%fd%" echo del "%%~fc" 
        )
    )
)
pause
复制代码

echo结果

del "c:\user\liky\log\ex20130430.log"
del "c:\user\wxh\log\ex20130430.log"
请按任意键继续. . .
复制代码

可以了，去掉echo也可以了，谢谢。
当初显示和删除不一样。。。
标记下，日后回报。

另外，每N个客户如果没有日志文件的话，就会回显一行无可用范例
把del的文件，echo保存为deldate.txt日志咯？

CrLf

论坛巡查

Rank: 8 Rank: 8

帖子: 6388
积分: 18843
技术: 982
捐助: 100
注册时间: 2010-10-9

28楼

发表于 2013-4-30 19:47 | 只看该作者

linux 的 find.exe 可以这样：

find.exe 目录 -mtime +40
rem 搜索目录下修改日期在 40 天前的文件
复制代码

链接：在线第三方命令行工具下载 bat、vbs、js 原生混编

apang

上将

Rank: 8 Rank: 8

帖子: 2085
积分: 14204
技术: 665
捐助: 0
注册时间: 2011-11-27

29楼

发表于 2013-4-30 21:01 | 只看该作者

这样可以不？

@echo off
for /f "delims=" %%a in ('xcopy /d:05-01-2013 /ls *.log c:\') do set "%%a=1"
for /r %%a in (*.log) do if not defined %%a echo %%a
Rem 查找2013年5月1日之前修改的文件
pause
复制代码

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

30楼

发表于 2013-4-30 21:31 | 只看该作者

回复 28# CrLf

谢谢，总是能学习到一些东东，从前辈这里。
exe的，我搜索怎么说是微软的