Partager via

Étape 6 : Les changements sont envoyés au serveur (tutoriel 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.

Notes

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 objets Recordset, et les objets Recordset modifiés peuvent mettre à jour la source de données. Ce 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. "SELECT * FROM Authors","=MS Remote;=Pubs;" & _  
=https://yourServer;=SQLOLEDB;"  
...              ' Edit the Recordset.  
rs.   ' The equivalent of   
...

Partie A Supposons dans ce cas que vous n’avez utilisé que le RDS.DataControl et qu’un objet Recordset est maintenant associé au RDS.DataControl. La méthode SubmitChanges met à jour la source de données avec toutes 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

Ceci est la fin du tutoriel.

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.

Voir aussi

Fournisseur de communication à distance Microsoft OLE DB (fournisseur de services ADO)
Tutoriel RDS
Tutoriel RDS (VBScript)