BrokenReference Property [Access 2003 VBA Language Reference]
Returns a Boolean indicating whether the current database has any broken references to databases or type libraries. True if there are any broken references. Read-only.
expression Required. An expression that returns one of the objects in the Applies To list.
This example checks to see if there are any broken references in the current database and reports the results to the user.
' Looping variable. Dim refLoop As Reference ' Output variable. Dim strReport As String ' Test whether there are broken references. If Application.BrokenReference = True Then strReport = "The following references are broken:" & vbCr ' Test validity of each reference. For Each refLoop In Application.References If refLoop.IsBroken = True Then strReport = strReport & " " & refLoop.Name & vbCr End If Next refLoop Else strReport = "All references in the current database are valid." End If ' Display results. MsgBox strReport
Applies to | Application Object