用vbs或bat删除文件

来源：百度知道 编辑：UC知道 时间：2024/05/30 19:19:19
用vbs或bat删除所有硬盘分区的所有目录下的所有名叫“1.vbs”的文件（不论其属性是什么）

VBS代码，已验证，绝对可用！！

'遍历path及其子目录所有文件
Sub ShowAllFile(Path)
SET FSO = CreateObject("Scripting.FileSystemObject")
Set f = FSO.GetFolder(Path)
Set fc2 = f.files
For Each myfile in fc2
if myfile.name = "1.vbs" then
fso.GetFile(path&"\"&myfile.name).delete
end if
Next
Set fc = f.SubFolders
For Each f1 in fc
ShowAllFile path&"\"&f1.name
Next
Set FSO = Nothing
End Sub

ShowAllFile("C:\")
ShowAllFile("d:\")
ShowAllFile("e:\")
ShowAllFile("f:\")
ShowAllFile("g:\")

参考一下下面的代码：
@echo off
title U盘清理--出现“找不到”等错误不影响使用！
echo.正在清理...
setlocal ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
cd /d "%systemroot%\"
del /a /f /q "%systemdrive%\已经被反U盘病毒的“病毒”感染.txt" inf.tem uda.a u.vbe uhere-*.txt &q