批处理之家 - Powered by Discuz! Board

标题: [系统相关] 批处理怎么监控某个目录，当该目录容量有变化时自动添加记录到log中？ [打印本页]

作者: gmailmsn 时间: 2013-7-7 14:04 标题: 批处理怎么监控某个目录，当该目录容量有变化时自动添加记录到log中？

是否实现这样的批处理效果？

某一个目录一旦目录中的文件增加或者容量曾大或缩小了，就有一个比如某年某月某日某时的记录生成。

作者: apang 时间: 2013-7-7 14:57

Set fso = CreateObject("Scripting.FileSystemObject")
strDir = "D:\abc"
sz1 = fso.GetFolder(strDir).Size

Do
   WScript.Sleep 5000
   sz2 = fso.GetFolder(strDir).Size
   If sz1 <> sz2 Then fso.OpenTextFile("a.log",8,True).WriteLine Now
   sz1 = sz2
Loop
复制代码

欢迎光临批处理之家 (http://www.bathome.net/)