次の方法で共有


AdoSubmitConnection.Connection プロパティ

定義

オブジェクトに使用する接続文字列をAdoSubmitConnection取得または設定します。

public:
 abstract property System::String ^ Connection { System::String ^ get(); void set(System::String ^ value); };
public abstract string Connection { get; set; }
member this.Connection : string with get, set
Public MustOverride Property Connection As String

プロパティ値

データ接続の接続文字列。

次の例では、Button コントロールのイベント ハンドラーは、AdoSubmitConnection クラスの Connection プロパティを使用して、Employees という名前のセカンダリ データ ソースの接続文字列を更新し、メイン データ ソースの ServerName フィールドに入力された値を使用して新しいサーバーを指すようにします。 次に、 Execute() クラスの メソッドを DataConnection 使用して、新しいサーバー上のデータ接続のクエリを再実行します。

public void ChangeServerName_Clicked(object sender, ClickedEventArgs e)
{
   // Get the Employees connection from the 
   //DataConnections collection.
   AdoSubmitConnection myAdoSubmitConnection = 
      (AdoSubmitConnection)(this.DataConnections["Employees"]);

   // Get the new server name from the ServerName field in 
   // the main data source.
   XPathNavigator myNav = 
      CreateNavigator().SelectSingleNode("/my:myFields/my:ServerName",
      NamespaceManager);
   string newServer = myNav.InnerXml;

   // Build the new connection string.
   string connectionString = 
      "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;";
   connectionString += "Initial Catalog=SalesDB;Data Source=" + 
      newServer;

   // Set the new connection string.
   myAdoSubmitConnection.Connection = connectionString;

   // Requery the data source.
   myAdoSubmitConnection.Execute();
}
Public Sub ChangeServerName_Clicked(ByVal sender As Object, _
   ByVal e As ClickedEventArgs)
   ' Get the Employees connection from 
   ' the DataConnections collection.
   Dim myAdoSubmitConnection As AdoSubmitConnection = _
      DirectCast(Me.DataConnections("Employees"), AdoSubmitConnection)

   ' Get the new server name from the ServerName field in 
   ' the main data source.
   Dim myNav As XPathNavigator = _
     CreateNavigator().SelectSingleNode("/my:myFields/my:ServerName", _
      NamespaceManager)
   Dim newServer As String = myNav.InnerXml

   ' Build the new connection string.
   Dim connectionString As String = _
      "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;"
   connectionString = connectionString & _
      "Initial Catalog=SalesDB;Data Source=" & newServer

   ' Requery the data source.
    myAdoSubmitConnection.Execute()
End Sub

注釈

ADOSubmitConnection オブジェクトの Connection プロパティは、ActiveX Data Objects/OLEDB 外部データ ソースに接続するために ADO データ接続によって使用される接続文字列へのアクセスを提供します。

重要: ADOSubmitConnection オブジェクトは、対応する ADOQueryConnection オブジェクトがあり、両方のオブジェクトで表されるデータ接続が同じプロパティ値のセットを共有している場合にのみ存在できます。 ADOSubmitConnection オブジェクトのこのプロパティの値を変更すると、対応する ADOQueryConnection オブジェクトの同じプロパティの値も変更されます。

: ADOSubmitConnection オブジェクトは、Microsoft SQL Server および Microsoft Access データベースでのみ動作するように制限されています。

このメンバは、現在開いているフォームと同じドメインで実行中のフォーム、またはクロスドメインのアクセス許可が与えられたフォームだけがアクセスできます。

この型またはメンバーには、Microsoft InfoPath Filler で開いたフォームで実行されるコードからのみアクセスできます。

適用対象