VBScript-删除子文件夹中的json文件

我环顾四周，发现的所有示例都是非常通用的，我只需要代码就可以从临时Internet文件文件夹中随机命名的子文件夹中删除一个.json文件

目前，每次运行VBScript时，我都会下载一个非常小的文件，但是它似乎会将该文件下载到Temp Internet文件中，并且在随后的每次运行中，都会从那里而不是从Internet获取该文件。这是一个必须始终是新的文件

如何搜索临时Internet文件中的所有子文件夹并删除forge[1].json？然后，删除它的父文件夹

对于Dbitch：

'  DELETE CACHED FORGE FILE  ------------------------ '
Function DelFiles()

    look_subfolders UserProfile & "AppData\Local\Microsoft\Windows\Temporary Internet Files\Content.IE5\"

    Set Folder = objFso.GetFolder ( fold )

Sub look_subfolders ( fold )

    For Each objFile in Folder.Files
       If objFile.Name = "forge[1].json" Then
          objFile.Delete
    End If
       Next

'look into subfolders:
    For Each Subfolder in Folder.SubFolders
        look_subfolders Subfolder.Path
    Next
End Sub 

End Function

Set-objFso=CreateObject（“Scripting.FileSystemObject”）

在脚本顶部的其他位置定义（它适用于我使用过的所有其他对象）

我也试过这个

Path = UserProfile & "AppData\Local\Microsoft\Windows\Temporary Internet Files\Content.IE5"

Set objFolder = objFso.GetFolder(Path)
Set colFiles = objFolder.Files

For Each objFile in colFiles
   If objFile.Name = "forge[1].json" Then
        objFile.Delete
End If
  Next

For Each objFile In objFolder.SubFolders    
   If objFile.Name = "forge[1].json" Then
        objFile.Delete
   End if
 Next

---

它从主文件夹中删除文件，但不深入任何子文件夹。

试试这个，这是一个递归调用：

Set fs = CreateObject("Scripting.FileSystemObject")

look_subfolders "C:\windows\temp" 'change the path to your temp folder

Sub look_subfolders(fold)
    Set Folder = fs.GetFolder(fold)

    'folder files:
    For Each objFile in Folder.Files
        If objFile.Name = "forge[1].json" Then
            objFile.Delete
            msgbox "File found and deleted" 'message to confirm deletion
            WScript Quit
        End If
    Next

    'look into subfolders:
    For Each Subfolder in Folder.SubFolders
        look_subfolders Subfolder.Path
    Next
End Sub

---

不幸的是，我在定义Sub的行中遇到了语法错误。您有没有可能在没有Sub的情况下复制该代码？就像直接代码一样？通过编辑您的问题来共享您的代码。语法错误可能意味着您键入了错误的内容。你表现得越努力，surfacesI编辑代码的帮助就越好，是不是因为我在函数中使用了它？如果是这样的话，您是否可以编辑您的代码以实现相同的目标，而不使用sub？此外，我不需要搜索我正在路径中的文件夹，只需搜索它的子文件夹。我没有发现任何错误。您得到了什么错误描述？我可以不使用sub，但不会查看temp文件夹的子文件夹。可以吗？我从函数中取出了代码，它工作正常。不能在VBScript中嵌套sub。所以清理你的代码布局。不是我的代码，但是我有点感觉它与sub有关，所以我尝试只运行没有sub的代码，但它实际上并没有删除我需要删除的文件。我添加了一些其他代码，当我尝试在没有sub的情况下运行它时，我正在玩弄它们。