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

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

 

你可能感兴趣的:(删除脚本)