步骤 2: 调用服务器程序(RDS 教程)

目录

您所在的步骤...

讨论

当调用客户端代理程序的方法时,服务器上的实际程序将执行该方法。在该步骤中,将在服务器上执行查询。

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 = "http://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=http://YourServer"

B 部分  执行该步骤的一般方法是调用 RDSServer.DataFactory 对象的 Query 方法。该方法使用用于连接数据源的连接字符串,以及用于指定从数据源返回行的命令文本。

该教程使用 RDSServer.DataFactory Query 方法:

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

下一页   步骤 3

www.2mysite.net