欢迎光临
我们一直在努力

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

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

 

赞(0)
【声明】:本博客不参与任何交易,也非中介,仅记录个人感兴趣的主机测评结果和优惠活动,内容均不作直接、间接、法定、约定的保证。访问本博客请务必遵守有关互联网的相关法律、规定与规则。一旦您访问本博客,即表示您已经知晓并接受了此声明通告。