FrontPage VBA教程:LocateFolder方法

返回指定的 WebFolder对象。

expression.LocateFolder(FolderUrl)

expression  返回 WebFolder对象的表达式。

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

VBA示例

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

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


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")

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

上页:FrontPage VBA教程:LocateFile方法 下页:FrontPage VBA教程:LocatePage方法

FrontPage VBA教程:LocateFolder方法

FrontPage VBA教程:LocatePage方法 FrontPage VBA教程:MakeAbs方法
FrontPage VBA教程:MakeRel方法 FrontPage VBA教程:MakeWeb方法
FrontPage VBA教程:Move方法 FrontPage VBA教程:OnTime方法
FrontPage VBA教程:Open方法 FrontPage VBA教程:ParseURL方法
FrontPage VBA教程:Publish方法 FrontPage VBA教程:queryCommandEnabled方法
FrontPage VBA教程:queryCommandIndeterm方法 FrontPage VBA教程:queryCommandState方法
FrontPage VBA教程:queryCommandSupported方法 FrontPage VBA教程:queryCommandText方法
FrontPage VBA教程:queryCommandValue方法 FrontPage VBA教程:Quit方法
FrontPage VBA教程:RecalcHyperlinks方法 FrontPage VBA教程:Refresh方法
FrontPage VBA教程:removeBotAttribute方法 FrontPage VBA教程:RemoveChoice方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号