步驟 2:叫用伺服器程式 (RDS 教學課程)
當您在用戶端 Proxy 上叫用方法時,伺服器上的實際程式會執行方法。 在此步驟中,您將在伺服器上執行查詢。
重要
從 Windows 8 和 Windows Server 2012 開始,Windows 作業系統中不再包含 RDS 伺服器元件 (請參閱 Windows 8 和 Windows Server 2012 相容性逐步指南 (英文) 以取得詳細資料)。 未來的 Windows 版本將移除 RDS 用戶端元件。 請避免在新的開發工作中使用這項功能,並規劃修改目前使用這項功能的應用程式。 使用 RDS 的應用程式應該移轉至 WCF 資料服務。
A 部分 如果您在本教學課程中未使用 RDSServer.DataFactory,執行此步驟的最便利方式就是使用 RDS.DataControl 物件。 RDS.DataControl 結合了上一個步驟來建立 Proxy,並搭配此步驟發出查詢。
設定 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")
...