Question

我正在尝试使用以下VB脚本从Windows Temp文件夹中删除所有以字符串“MyApp”开头的日志文件。

Dim objFSO
Set objFSO = CreateObject("Scripting.FileSystemObject")

if objFSO.FolderExists("C:\Documents and Settings\guest\MyApp") Then
          set folder = objFSO.getFolder("C:\Documents and Settings\guest\MyApp") 

if folder.files.Count <> 0 then 
    objFSO.DeleteFile "C:\Documents and Settings\guest\MyApp\*.*", True
end if 
          objFSO.DeleteFolder "C:\Documents and Settings\guest\MyApp", True
end if

<!--  The below code is not deleting the files which starts with the name "Mpp.023648011.log"   -->

if(objFSO.FileExists("C:\Documents and Settings\guest\Local Settings\Temp\MyApp.*")) Then
    objFSO.DeleteFile "C:\Documents and Settings\guest\Local Settings\Temp\MyApp.*", True
end if

以下检查似乎失败了：

if（objFSO.FileExists（“C：\ Documents and Settings \ guest \ Local Settings \ Temp \ MyApp。*”））

提前致谢。

我找到了一种方法来抑制错误信息并执行DeleteFile。它对我有用。

     On error resume next

     objFSO.DeleteFile "C:\Documents and Settings\guest\Local Settings\Temp\MyApp.*", True

Answer 1

我认为VBScript不支持使用通配符 FileExists 。更好的选择是禁止删除错误并运行DeleteFile命令。

 On error resume next

 objFSO.DeleteFile "C:\Documents and Settings\guest\Local Settings\Temp\MyApp.*", True

如何使用VBScript删除以临时文件夹中的特定名称开头的所有文件

1 个答案: