备忘录

记录点滴技术

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

2017年9月29日

摘要: 'path 目录 'ext 文件扩展名'expiredDays 保留多少天以内的文件Sub LogCleaner(path,ext,expiredDays) On Error Resume Next Set oFso = CreateObject("Scripting.FileSystemObjec 阅读全文
posted @ 2017-09-29 15:43 goding 阅读(166) 评论(0) 推荐(0) 编辑