BaseConnectionString Property Example
The following example displays the BaseConnectionString property setting of the current project:
Dim objCurrent As Object
Set objCurrent = Application.CurrentProject
MsgBox "The current base connection is " _
& objCurrent.BaseConnectionString