分类: 文章 • 2022-09-20 21:27:58

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objfso.GetFolder("e:\aaa")

For Each objFile In objFolder.Files
objfile.Delete
Next

For Each objSubFolder In objfolder.SubFolders
objSubFolder.Delete
Next

删除目录下的文件及子目录