Variables VBS将变量传递给递归子对象

我是VBS和脚本的新手。我有一个内务管理脚本，其中包括清理我有点麻烦的空文件夹，希望有人能告诉我哪里出了问题

这是我的潜水艇

sub clearfolder(folder) 'Recursive search for old empty folders
For Each Subfolder in Folder.SubFolders
    If Subfolder.Files.Count = 0 And Subfolder.SubFolders.Count = 0 Then
        Logwrite "The folder:" & Subfolder.Path & " is empty and will be removed"
        redim preserve arrFolders(arrpath)
        arrFolders(arrpath) = Subfolder.Path
        foldersDeleted = foldersDeleted + 1
        arrpath = arrpath + 1
    else
        Logwrite "The folder:" & Subfolder.Path & " Contains files or folders"
    End If
    clearfolder Subfolder
Next
end sub

当我给潜艇打电话时

这项工作：

clearfolder objFSO.GetFolder ("F:\Scripts\file_cleardown\Testing\_UK")

这不起作用：（strVariable在path之上）

有人能解释为什么我不能传递一个包含路径而不是完整路径的变量吗？我尝试了各种方法将路径作为变量传递，但通常会出现以下错误

---------------------------
Windows Script Host
---------------------------
Script: F:\Scripts\file_cleardown\bill_cleanup.vbs
Line:   70
Char:   2
Error:  Object required: 'folder'
Code:   800A01A8
Source: Microsoft VBScript runtime error

---------------------------
OK   
---------------------------

---

提前谢谢

错误消息显示您尝试了

clearfolder strVariable

，而不是

clearfolder objFSO.GetFolder（strVariable）

。如果不是这样，请显示完整的非工作代码。我想我已经解决了这个问题，看起来像一个简单的语法错误，谢谢！

---------------------------
Windows Script Host
---------------------------
Script: F:\Scripts\file_cleardown\bill_cleanup.vbs
Line:   70
Char:   2
Error:  Object required: 'folder'
Code:   800A01A8
Source: Microsoft VBScript runtime error

---------------------------
OK   
---------------------------