Schritt 6: Änderungen werden an den Server gesendet (RDS-Tutorial)

Wenn das Recordset-Objekt bearbeitet wird, können alle Änderungen (also Zeilen, die hinzugefügt, geändert oder gelöscht werden) zurück an den Server gesendet werden.

Hinweis

Das Standardverhalten von RDS kann implizit mit ADO-Objekten und dem Microsoft OLE DB-Remoting-Anbieter aufgerufen werden. Abfragen können Recordset-Objekte zurückgeben und bearbeitete Recordset-Objekte können die Datenquelle aktualisieren. Dieses Tutorial ruft RDS nicht mit ADO-Objekten auf, aber so würde es in diesem Fall aussehen:

Dim rs as New ADODB.Recordset  
rs. "SELECT * FROM Authors","=MS Remote;=Pubs;" & _  
=https://yourServer;=SQLOLEDB;"  
...              ' Edit the Recordset.  
rs.   ' The equivalent of   
...  

Teil A Gehen Sie für diesen Fall davon aus, dass Sie nur das RDS.DataControl verwendet haben und dass ein Recordset-Objekt jetzt dem RDS.DataControl zugeordnet ist. Die SubmitChanges-Methode aktualisiert die Datenquelle mit allen Änderungen am Recordset-Objekt, wenn die Server- und Connect-Eigenschaften weiterhin festgelegt sind.

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.  
...  

Teil B Alternativ können Sie den Server mit dem RDSServer.DataFactory-Objekt aktualisieren, indem Sie eine Verbindung und ein Recordset-Objekt angeben.

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  

Dies ist das Ende des Tutorials.

Wichtig

Ab Windows 8 und Windows Server 2012 sind RDS-Serverkomponenten nicht mehr im Windows-Betriebssystem enthalten (weitere Informationen finden Sie in den jeweiligen Kompatibilitäts-Cookbooks zu Windows 8 und Windows Server 2012). RDS-Clientkomponenten werden in einer zukünftigen Version von Windows entfernt. Nutzen Sie diese Funktionen bei Neuentwicklungen nicht mehr, und planen Sie die Änderung von Anwendungen, die diese Funktion zurzeit verwenden. Anwendungen, die RDS verwenden, sollten zu WCF Data Service migriert werden.

Weitere Informationen

Microsoft OLE DB-Remoting-Anbieter (ADO-Dienstanbieter)
RDS-Tutorial
RDS-Tutorial (VBScript)