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

2023-06-28,

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

 

《删除目录下的文件及子目录.doc》

下载本文的Word格式文档,以方便收藏与打印。