FullName Property Example

The following example interates through the AllDataAccessPages collection and returns the name of the link and the path of each data access page in the current project.

Sub PrintDAPLocationInfo()
    Dim dapObject As AccessObject
    For Each dapObject In CurrentProject.AllDataAccessPages
        Debug.Print "The '" & dapObject.Name & _
        "' is located at: "; dapObject.FullName
    Next dapObject
End Sub