Condividi tramite


Passaggio 2: Richiamare il programma del server (esercitazione su RDS)

Quando si richiama un metodo nel proxy client, tale metodo viene eseguito nel programma effettivo del server. In questo passaggio si eseguirà una query sul server.

Importante

A partire da Windows 8 e Windows Server 2012, i componenti del server di RDS non sono più inclusi nel sistema operativo Windows. Per altri dettagli, vedere la Guida di riferimento per la compatibilità di Windows 8 e Windows Server 2012. I componenti del client di RDS verranno rimossi in una versione futura di Windows. Evitare di usare questa funzionalità in un nuovo progetto di sviluppo e prevedere interventi di modifica nelle applicazioni in cui è attualmente implementata. Le applicazioni che usano RDS devono eseguire la migrazione a WCF Data Service.

Parte A. Se in questa esercitazione non si usa RDSServer.DataFactory, il modo più comodo per eseguire questo passaggio è quello di usare l'oggetto RDS.DataControl. RDS.DataControl combina la creazione di un proxy del passaggio precedente con l'esecuzione della query descritta in questo passaggio.

Impostare la proprietà Server dell'oggetto RDS.DataControl in modo da identificare la posizione in cui creare un'istanza del programma server. Impostare inoltre la proprietà Connect per specificare la stringa di connessione per accedere all'origine dati e la proprietà SQL per definire il testo del comando di query. Eseguire quindi il metodo Refresh per fare in modo che il programma server si connetta all'origine dati, recuperi le righe specificate dalla query e restituisca un oggetto Recordset al client.

Sebbene in questa esercitazione si usi un altro oggetto, di seguito è riportato un esempio di 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  
...  

Sebbene in questa esercitazione si usi un altro metodo, di seguito è riportato un esempio di chiamata a RDS con oggetti ADO:

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. Il metodo generale per eseguire questo passaggio consiste nel richiamare il metodo Query dell'oggetto RDSServer.DataFactory. Questo metodo accetta una stringa di connessione, usata per connettersi a un'origine dati, e un testo di comando, usato per specificare le righe da restituire dall'origine dati.

Questa esercitazione usa il metodo Query dell'oggetto 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")  
...  

Vedi anche

Passaggio 3: Il server ottiene un recordset (esercitazione su RDS)
Esercitazione su RDS (VBScript)