Etapa 2: Invocar o Programa de Servidor (Tutorial rds)

Quando você invoca um método no cliente proxy, 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 (consulte o Windows 8 e o Windows Server 2012 Compatibility Cookbook para obter mais detalhes). Os componentes do cliente RDS serão removidos em uma versão futura do Windows. Evite usar esse recurso em um novo trabalho de desenvolvimento e planeje modificar aplicativos que atualmente usam esse recurso. Os aplicativos que utilizam RDS devem migrar para WCF Data Service.

Parte A Se você não estivesse usando RDSServer.DataFactory neste tutorial, a maneira mais conveniente de executar essa etapa seria usar o objeto RDS.DataControl. O RDS.DataControl combina a etapa anterior de criação de um proxy com esta etapa de emissão da consulta.

Defina a propriedade Server do objeto RDS.DataControl para identificar onde o programa do servidor deve ser instanciado; a propriedade Connect para especificar a string 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 Atualizar para fazer com que o programa de servidor se conecte à fonte de dados, recupere linhas especificadas pela consulta e retorne um objeto Recordset ao cliente.

Este tutorial não usa o RDS . DataControl, mas seria assim se fosse:

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 do ADO, mas é assim que seria se ele o fizesse:

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 executar esta etapa é invocar o objeto RDSServer.DataFactory com o método Query. 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 objeto DataFactory método 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")  
...  

Consulte Também

Etapa 3: o servidor obtém um conjunto de registros (Tutorial RDS)
Tutorial de RDS (VBScript)