FrontPage VBA教程:MakeAbs方法

将 Application对象更改为绝对对象而不是相对对象。有关绝对和相对 URL 的详细信息,请参阅了解绝对和相对 URL 地址

expression.MakeAbs(URLBase,URL)

expression  返回 Application对象的表达式。

URLBase  必选,Variant 类型。基本 URL。可以是下列类型之一:字符串,或者 Web、WebFolder、WebFile、NavigationNode 及 IHTMLDocuemnt2 类型的对象。

URL  必选,String 类型。包含站点完整 URL 的字符串。这可以是站点的任何 URL,如 http://Web 服务器/文件夹或 file://文件系统/文件夹(对于基于磁盘的站点)。

VBA示例

本示例将相对 URL 更改为绝对 URL。

注意  要运行本示例,必须有一个站点和一个称为“C:\My Documents\My Webs\Rogue Cellarsars\Zinfandel.htm”(对于在 Microsoft Windows 上运行的服务器)或“C:\WINNT\Profiles\logon alias\Personal\My Webs\Rogue Cellars\Zinfandel.htm”(对于在 Windows NT 上运行的服务器)的文件。在两种情况下,您都可以用其他站点 URL 或文件来代替。


Private Sub MakeURLAbsolute()
    Dim myBaseURL As WebEx
    Dim myAbsAddress As String
    Dim myLocalUrl As String
    myBaseURL = Webs.Open("C:\My Webs")
    myLocalUrl = "Zinfandel.htm"
    myAbsAddress = MakeAbs(myBaseURL, myLocalUrl)
End Sub

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

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方法
FrontPage VBA教程:RemoveWeb方法 FrontPage VBA教程:Run方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号