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
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。