VBS脚本

清除文件夹下所有文本的内容-慎用

VBS基于Visual Basic的脚本语言， VBS的全称是：Microsoft Visual Basic Script Edition。（微软公司可视化BASIC脚本版）。其语言类似Visual Basic（VB）。直接运行时，后缀名为.vbs。 HTML引用时后缀可用.js
注意:除直接.vbs使用，和HTA引用javascript方式使用vbs外，新版本浏览器将不支持vbs语言。



set fso=createobject("scripting.filesystemobject")
set folder=fso.getfolder("C:\Users\Administrator\Desktop\1")
set files=folder.files
for each fl in files
if right(fl,4)=".txt" then
set file=fso.opentextfile(fl,2)
file.close
end if
next
msgbox "已经清空文件夹c\xxx下的文本文档的内容！"