手順 2:サーバー プログラムを呼び出す (RDS チュートリアル)

  • [アーティクル]

クライアント プロキシでメソッドを呼び出すと、サーバー上の実際のプログラムがそのメソッドを実行します。 この手順では、サーバー上でクエリを実行します。

重要

Windows 8 および Windows Server 2012 から、RDS サーバー コンポーネントが Windows オペレーティング システムに含まれなくなりました (詳細については、Windows 8 および Windows Server 2012 の互換性クックブックを参照してください)。 RDS クライアント コンポーネントは、今後のバージョンの Windows で削除される予定です。 新規の開発作業ではこの機能を使用しないようにし、現在この機能を使用しているアプリケーションは修正することを検討してください。 RDS を使用するアプリケーションを WCF Data Service に移行する必要があります。

パート A このチュートリアルで RDSServer.DataFactory を使っていない場合、この手順を実行する最も便利な方法は RDS.DataControl オブジェクトを使うことになります。 RDS.DataControl は、プロキシを作成する前の手順と、クエリを発行するこの手順を組み合わせています。

RDS.DataControl オブジェクトの Server プロパティにサーバー プログラムがインスタンス化される場所、Connect プロパティにデータソースにアクセスするための接続文字列、SQL プロパティにクエリ コマンド テキストを設定します。 そして、Refresh メソッドを発行して、サーバー プログラムがデータソースに接続し、クエリで指定した行を取得し、Recordset オブジェクトをクライアントに返すようにします。

このチュートリアルでは RDS.DataControl を使いませんが、使う場合は次のようになります。

Sub RDSTutorial2A()  
   Dim DC as New RDS.DataControl  
   DC.Server = "https://yourServer"  
   DC.Connect = "DSN=Pubs"  
   DC.SQL = "SELECT * FROM Authors"  
   DC.Refresh  
...

また、このチュートリアルでは ADO オブジェクトで RDS を呼び出しませんが、呼び出す場合は次のようになります。

Dim rs as New ADODB.Recordset  
rs.Open "SELECT * FROM Authors","Provider=MS Remote;Data Source=Pubs;" & _  
        "Remote Server=https://yourServer;Remote Provider=SQLOLEDB;"

パート B この手順を実行する一般的な方法は、RDSServer.DataFactory オブジェクト Query メソッドを呼び出すことです。 このメソッドは、データソースに接続するために使う接続文字列と、データソースから返される行を指定するために使うコマンド テキストを受け取ります。

このチュートリアルでは、DataFactory オブジェクト Query メソッドを使います。

Sub RDSTutorial2B()  
   Dim DS as New RDS.DataSpace  
   Dim DF  
   Dim RS as ADODB.Recordset  
   Set DF = DS.CreateObject("RDSServer.DataFactory", "https://yourServer")  
   Set RS = DF.Query ("DSN=Pubs", "SELECT * FROM Authors")  
...

参照

手順 3:サーバーがレコード セットを取得する (RDS チュートリアル)
RDS のチュートリアル (VBScript)