怎么覆盖已有文件_删除文件只要点两下

最近因为写文章，所以需要截很多张图，但我又是比较懒的一个人，所以就想着能不能清理文件的时候，直接双击脚本就把指定文件夹里的文件全清除了。那么，还真有，代码里直接操作文件就行啦。

1.创建文本文档，后缀改为vbs，打开脚本选择另存为，编码格式改成ANSI，确定覆盖已有文件。

前置工作

2.输入以下代码。

dim fso, files, wsnet, userName, folderPath, fileset wsnet = CreateObject("wscript.network")userName = wsnet.usernamefolderPath = "临时图片"  '文件夹名字set fso = CreateObject("Scripting.FileSystemObject")set files = fso.getfolder("C:甥敳獲" & userName & "Desktop" & folderPath).filesFor Each file in files     file.deletenextmsgbox "清理完成"wscript.quit

因为我是把文件夹放桌面上的，所以我的路径是"C:甥敳獲" & userName & "Desktop" & folderPath，和下图中的路径是一样的。

路径显示

当然下图中红框里的路径可以改成你想要操作的文件夹的具体路径，或者可以参考下我前两篇内容，通过拖拽的方式，获取到想要操作的文件夹的具体路径，来实现删除里面的文件。

今天到此就结束了，内容有点少，但其实也能发散下思维，比如可以自己填写地址，具体可以参考如何用VB实现桌面提醒小程序，实现窗口界面和输入框，再比如可以给电脑添加计划任务，每天定时清理某个文件夹里的垃圾文件，具体可以参考给电脑一个小目标，比如每天叫你起床或者让电脑更加智能化，SayHello。

明天如果来得及的话应该会教大家怎么让电脑听你说话，毕竟我们已经可以实现让电脑说话了，怎么能少得了让电脑听你说话呢。再接下去就是和电脑对话了，也许和电脑互怼也是一种缓解生活压力的方式。