Etapa 2: Invocar o programa de servidor (Tutorial RDS)
Quando você invoca um método no proxy do cliente, o programa real no servidor executa o método. Nesta etapa, você executará uma consulta no servidor.
Importante
A partir do Windows 8 e do Windows Server 2012, os componentes do servidor RDS não estão mais incluídos no sistema operacional Windows (confira Windows 8 e Manual de Compatibilidade do Windows Server 2012 para obter mais detalhes). Os componentes do cliente RDS serão removidos em uma versão futura do Windows. Evite usar esse recurso em desenvolvimentos novos e planeje modificar os aplicativos que atualmente o utilizam. Os aplicativos que usam o RDS devem migrar para o Serviço de Dados do WCF.
Parte A Se você não estiver usando RDSServer.DataFactory neste tutorial, a maneira mais conveniente de executar essa etapa será usar o objeto RDS.DataControl. O RDS.DataControl combina a etapa anterior de criação de um proxy, com esta etapa, emitindo a consulta.
Defina a propriedade Server do objeto RDS.DataControl para identificar em que ponto a instância do programa de servidor deve ser criada, a propriedade Connect para especificar a cadeia de conexão para acessar a fonte de dados e a propriedade SQL para especificar o texto do comando de consulta. Em seguida, emita o método Refresh para fazer com que o programa do servidor se conecte à fonte de dados, recupere as linhas especificadas pela consulta e retorne um objeto Recordset ao cliente.
Este tutorial não usa o RDS.DataControl, mas ele seria assim se o usasse:
Sub RDSTutorial2A()
Dim DC as New RDS.DataControl
DC.Server = "https://yourServer"
DC.Connect = "DSN=Pubs"
DC.SQL = "SELECT * FROM Authors"
DC.Refresh
...
O tutorial também não invoca o RDS com objetos ADO, mas é assim que ele seria se invocasse:
Dim rs as New ADODB.Recordset
rs.Open "SELECT * FROM Authors","Provider=MS Remote;Data Source=Pubs;" & _
"Remote Server=https://yourServer;Remote Provider=SQLOLEDB;"
Parte B O método geral de execução desta etapa é invocar o método Query do objeto RDSServer.DataFactory. Esse método usa uma cadeia de conexão, que é usada para se conectar a uma fonte de dados, e um texto de comando, que é usado para especificar as linhas a serem retornadas da fonte de dados.
Este tutorial usa o método Query do objeto DataFactory:
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")
...
Consulte Também
Etapa 3: O servidor obtém um conjunto de registros (Tutorial RDS)
Tutorial RDS (VBScript)