Propriété OfficeDataSourceObject.ConnectString (Office)

  • Article

Obtient ou définit une valeur de type String qui représente la connexion à la source de données de fusion et publipostage spécifiée. Lecture-écriture.

Syntaxe

expression. ConnectString

Expression Variable qui représente un objet OfficeDataSourceObject .

Exemple

Cet exemple montre comment vérifier si la chaîne de connexion contient les caractères ODSOOutlook et afficher un message en conséquence.

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

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.