Freigeben über


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

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

Anmerkung

Das Standardverhalten von RDS kann implizit mit ADO-Objekten und dem Microsoft OLE DB-Remotinganbieter aufgerufen werden. Abfragen können Recordset-s zurückgeben, und bearbeitete Recordset-s können die Datenquelle aktualisieren. Dieses Lernprogramm ruft RDS nicht mit ADO-Objekten auf, aber so würde es aussehen, wenn dies der Fall wäre:

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 verwendet haben. DataControl und dass ein Recordset--Objekt jetzt dem RDS zugeordnet ist. DataControl. Die methode SubmitChanges aktualisiert die Datenquelle mit änderungen am Recordset--Objekt, wenn die eigenschaften Server und Connect 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 und 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 Lernprogramms.

Wichtig

Ab Windows 8 und Windows Server 2012 sind RDS-Serverkomponenten nicht mehr im Windows-Betriebssystem enthalten (weitere Details finden Sie unter Windows 8 und Windows Server 2012 Compatibility Cookbook). RDS-Clientkomponenten werden in einer zukünftigen Version von Windows entfernt. Vermeiden Sie die Verwendung dieses Features in neuer Entwicklungsarbeit, und planen Sie, Anwendungen zu ändern, die derzeit dieses Feature verwenden. Anwendungen, die RDS verwenden, sollten zu WCF Data Servicemigrieren.

Siehe auch

Microsoft OLE DB Remoting Provider (ADO-Dienstanbieter)
RDS-Lernprogramm
RDS-Lernprogramm (VBScript)