Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Dient zum Abrufen oder Festlegen einer Zeichenfolge, die die Verbindung mit der angegebenen Seriendruck-Datenquelle darstellt. Lese-/Schreibzugriff.
Syntax
Ausdruck. ConnectString
Ausdruck Eine Variable, die ein OfficeDataSourceObject-Objekt darstellt.
Beispiel
In diesem Beispiel wird überprüft, ob das Verbindungszeichenfolge die Zeichen ODSOOutlook enthält, und zeigt eine entsprechende Meldung an.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.