Шаг 6. Изменения отправлены на сервер (учебник по RDS)

Если объект Recordset изменен, все изменения (т. е. строки, которые добавляются, изменяются или удаляются) могут быть отправлены обратно на сервер.

Примечание

Поведение RDS по умолчанию можно вызывать неявно с помощью объектов ADO и поставщика удаленного взаимодействия Microsoft OLE DB. Запросы могут возвращать наборы записей, а измененные наборы записеймогут обновлять источник данных. В этом руководстве не вызывается RDS с объектами ADO, но в этом случае он будет выглядеть следующим образом:

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

Часть А Предположим, что в этом случае вы использовали только RDS. DataControl и, что объект Recordset теперь связан с RDS. DataControl. Метод SubmitChanges обновляет источник данных любыми изменениями в объекте Recordset , если свойства Server и Connect по-прежнему заданы.

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

Часть Б Кроме того, можно обновить сервер с помощью объекта RDSServer.DataFactory , указав соединение и объект 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  

Это последняя часть руководства.

Важно!

Начиная с Windows 8 и Windows Server 2012 компоненты сервера RDS больше не включаются в операционную систему Windows (дополнительные сведения см. в Windows 8 и Windows Server 2012 совместимости). Клиентские компоненты RDS будут удалены в следующей версии Windows. Избегайте использования этого компонента в новых разработках и запланируйте изменение существующих приложений, в которых он применяется. Приложения, использующие RDS, должны перейти на службу данных WCF.

См. также:

Поставщик удаленного взаимодействия Microsoft OLE DB (поставщик служб ADO)
Учебник по RDS
Учебник по RDS (VBScript)