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

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

创新互联2013年至今,是专业互联网技术服务公司,拥有项目做网站、网站设计网站策划,项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命,1280元清河做网站,已为上家服务,为清河各地企业和个人服务,联系电话:18980820575

For Each objFile In objFolder.Files
        objfile.Delete
Next

For Each objSubFolder In objfolder.SubFolders
        objSubFolder.Delete
Next

 


分享标题:删除目录下的文件及子目录
地址分享:http://bzwzjz.com/article/iihgsd.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 成都网站建设 成都网站建设 品牌网站建设 成都网站制作 专业网站设计 成都网站建设公司 网站建设方案 网站设计 成都营销网站建设 成都网站制作公司 成都网站设计 成都网站建设公司 达州网站设计 成都网站制作 教育网站设计方案 阿坝网站设计 成都网站设计 成都定制网站建设 成都网站设计 网站建设 成都网站建设推广 定制网站设计