If Dir(s9, vbDirectory) <> "" Then
Shell "cmd /c rd /s /q """ & s9 & """"
End If
這個命令是用來全刪 s9 下所有檔案夾和檔案的，如何改為保留最新2個月的，其它全刪
s9下會有
...
2019-05
..
2019-09
..
2020-06
2020-07
2020-08
2020-09 (當前月)
如何改為保留 2020-08 和2020-09這兩個月的，洗掉其它所有檔案夾
感謝！！！
uj5u.com熱心網友回復：
最新兩個月是根據什么判斷？檔案夾名字？檔案夾創建時間？檔案夾中最新檔案的修改時間？假如檔案夾名字，那么
Year(Now) & "-" & Format(Day(Now), "00") 可以得到當前月
Year(Now) & "-" & Format(Day(DateAdd("m", -1, Now)), "00") 可以得到上個月
不是這兩個，就洗掉
uj5u.com熱心網友回復：
這個我知道，只是不知道用什么方法，可以剔除這兩個檔案夾，洗掉其它的，用什么命令
uj5u.com熱心網友回復：
判斷下
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/7363.html
標籤：VB基礎類