Partager via

Étape 6 : Les modifications sont envoyées au serveur (didacticiel RDS)

  • Article

Si l’objet Recordset est modifié, toutes les modifications (autrement dit, les lignes ajoutées, modifiées ou supprimées) peuvent être renvoyées au serveur.

Remarque

Le comportement par défaut de RDS peut être appelé implicitement avec des objets ADO et le fournisseur de communication à distance Microsoft OLE DB. Les requêtes peuvent retourner des Recordsets, et les Recordsets modifiéspeuvent mettre à jour la source de données. Ce didacticiel 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. "SELECT * FROM Authors","=MS Remote;=Pubs;" & _  
=https://yourServer;=SQLOLEDB;"  
...              ' Edit the Recordset.  
rs.   ' The equivalent of   
...

Partie A Supposez que vous n'avez utilisé que le RDS.DataControl et qu'un objet Recordset est désormais associé au RDS.DataControl. La méthode SubmitChanges met à jour la source de données avec les modifications apportées à l’objet Recordset si les propriétés Server et Connect sont toujours définies.

Sub RDSTutorial6A()  
Dim DC as New RDS.DataControl  
Dim RS as ADODB.Recordset  
DC. = "https://yourServer"  
DC. = "DSN=Pubs"  
DC. = "SELECT * FROM Authors"  
DC.  
...  
Set RS = DC.  
   ' Edit the Recordset.  
...  
DC.  
...

partie B Vous pouvez également mettre à jour le serveur avec l’objet RDSServer.DataFactory, en spécifiant une connexion et un objet Recordset.

Sub RDSTutorial6B()  
Dim DS As New RDS.DataSpace  
Dim RS As ADODB.Recordset  
Dim DC As New RDS.DataControl  
Dim DF As Object  
Dim blnStatus As Boolean  
Set DF = DS.("RDSServer.DataFactory", "https://yourServer")  
Set RS = DF. ("DSN=Pubs", "SELECT * FROM Authors")  
DC. = RS    ' Visual controls can now bind to DC.  
    ' Edit the Recordset.  
blnStatus = DF."DSN=Pubs", RS  
End Sub

Il s’agit de la fin du didacticiel.

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 Windows 8 et livre de recettes de compatibilité Windows Server 2012 pour plus de détails). Les composants clients RDS seront supprimés dans une prochaine version de Windows. Évitez d’utiliser cette fonctionnalité dans le nouveau travail 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.

Voir aussi

Fournisseur d'accès distant Microsoft OLE DB (Fournisseur de services ADO)
Didacticiel RDS
didacticiel RDS (VBScript)