Syntax

expression.ConnectString

expression A variable that represents an OfficeDataSourceObject object.

Example
This example checks if the connection string contains the characters ODSOOutlook and displays a message accordingly.

Visual Basic for Applications 
Sub VerifyCorrectDataSource() Dim appOffice As OfficeDataSourceObject Set appOffice = Application.OfficeDataSourceObject appOffice.Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _ "UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees" If InStr(appOffice.ConnectString, "ODSOOutlook") > 0 Then MsgBox "Your Outlook address book is used as the data source." Else MsgBox "Your Outlook address book is not used as the data source." End If End Sub
connect connect string connectstring connectstring property ofv

See also: