Étape 2 : Appeler le programme serveur (tutoriel RDS)

Lorsque vous appelez une méthode sur le proxy client, le programme réel sur le serveur exécute la méthode. Dans cette étape, vous allez exécuter une requête sur le serveur.

Important

À compter de Windows 8 et Windows Server 2012, les composants serveur RDS ne sont plus inclus dans le système d’exploitation Windows (voir le Guide pratique sur la compatibilité de Windows Server 2012 et Windows 8 pour plus de détails). Les composants clients RDS seront supprimés dans une version ultérieure de Windows. Évitez d'utiliser cette fonctionnalité dans de nouveaux travaux de développement, et prévoyez de modifier les applications qui utilisent actuellement cette fonctionnalité. Les applications qui utilisent RDS doivent migrer vers WCF Data Service.

Partie A Si vous n’utilisiez pas RDSServer.DataFactory dans ce tutoriel, la méthode la plus pratique pour effectuer cette étape consisterait à utiliser RDS.DataControl. RDS.DataControl combine l’étape précédente de la création d’un proxy, avec cette étape, l’émission de la requête.

Définissez la propriété Server de l’objet RDS.DataControl pour identifier l’emplacement où le programme serveur doit être instancié ; la propriété Connect pour spécifier la chaîne de connexion pour accéder à la source de données ; et la propriété SQL pour spécifier le texte de la commande de requête. Émettez ensuite la méthode Refresh pour que le programme serveur se connecte à la source de données, récupère les lignes spécifiées par la requête et retourne un objet Recordset au client.

Ce tutoriel n’utilise pas RDS.DataControl, mais voici à quoi cela ressemblerait si c’était le cas :

Sub RDSTutorial2A()  
   Dim DC as New RDS.DataControl  
   DC.Server = "https://yourServer"  
   DC.Connect = "DSN=Pubs"  
   DC.SQL = "SELECT * FROM Authors"  
   DC.Refresh  
...  

Le tutoriel n’appelle pas RDS avec des objets ADO, mais voici à quoi cela ressemblerait si c’était le cas :

Dim rs as New ADODB.Recordset  
rs.Open "SELECT * FROM Authors","Provider=MS Remote;Data Source=Pubs;" & _  
        "Remote Server=https://yourServer;Remote Provider=SQLOLEDB;"  

Partie B La méthode générale d’exécution de cette étape consiste à appeler la méthode Query de l’objet RDSServer.DataFactory. Cette méthode prend une chaîne de connexion, utilisée pour se connecter à une source de données, et un texte de commande, qui est utilisé pour spécifier les lignes à retourner à partir de la source de données.

Ce tutoriel utilise la méthode Query de l’objet 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")  
...  

Voir aussi

Étape 3 : Le serveur obtient un recordset (tutoriel RDS)
Tutoriel RDS (VBScript)