MakeAbs 方法

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

expression  返回 Application 对象的表达式。

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

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

示例

本示例将相对 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