DefaultWebOptions Object Example
The following example checks to see whether Microsoft Office Web components are downloaded when a saved data access page is displayed and sets the download flag accordingly.
Set objAppWebOptions = Application.DefaultWebOptions
With objAppWebOptions
If .DownloadComponents = True Then
strCompDownload = "Loaded"
Else
strCompDownload = "Not Loaded"
End If
End With