次の方法で共有

OfficeDataSourceObject.ConnectString プロパティ (Office)

  • [アーティクル]

取得または指定された差し込み印刷データ ソースへの接続を表す 文字列 を設定します。 値の取得と設定が可能です。

構文

式。ConnectString

式OfficeDataSourceObject オブジェクトを表す変数。

例

次の使用例は、接続文字列に ODSOOutlook 文字が含まれているかどうかを確認し、それに応じてメッセージを表示します。

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

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。