LocateFolder 方法

返回指定的 WebFolder 对象。

expression  返回 WebFolder 对象的表达式。

FolderUrl  必选，String 类型。默认值为 URL 的文件夹部分。 

示例

本示例查找站点根目录下的文件夹。

注意  要使用所有这些示例，必须打开站点。

Private Sub LocateAFolder()
    Dim myFolderFound As WebFolder

    Set myFolderFound = Webs(0).LocateFolder("images")
End Sub

多数情况下，您可能需要使用完整的 URL 作为 LocateFolder 方法的 String 参数。例如，文件夹在文件层次结构中的位置可能较深，如 C:/My Documents/My Webs/Rogue Cellars/Inventory/First_Quarter，而您要查找 First_Quarter。只要文件夹是在站点根目录以下，就需要使用完整的 URL，如下例所示。

Private Sub GetFolder()
    Dim myFolder As String
    Dim myFolderFound As WebFolder

    myFolder = _
        "C:/My Documents/My Webs/Rogue Cellars/Inventory/First_Quarter"

    Set myFolderFound = _
        Webs(0).LocateFolder(myFolder)
End Sub

但是，也可使用快捷方式。例如，如果您想要查找站点根目录中的图像文件夹，则可使用站点相对地址，其方法是：在反斜杠后面加上子文件夹名称，如下列语句所示。

Set myFolderFound = Webs(0).LocateFolder("images/JPG")

注意  不能在站点相对地址中用斜杠来代替反斜杠。