3

我正在尝试使用以下 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
4

1 回答 1

5

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

 On error resume next

 objFSO.DeleteFile "C:\Documents and Settings\guest\Local Settings\Temp\MyApp.*", True 
于 2012-08-02T21:52:43.893 回答