Url Property Example

This example returns the URL of the first file in the root folder of the active web.

Private Sub GetFileUrl()
Dim myFile As WebFile
Dim myURL As String

Set myFile = ActiveWeb.RootFolder.Files(0)
myURL = myFile.Url

End Sub