Compartilhar via

Etapa 6: As alterações são enviadas ao servidor (Tutorial RDS)

  • Artigo

Se o objeto Recordset for editado, quaisquer alterações (ou seja, linhas adicionadas, alteradas ou excluídas) poderão ser enviadas de volta ao servidor.

Observação

O comportamento padrão do RDS pode ser invocado implicitamente com objetos ADO e o Provedor Microsoft OLE DB de Comunicação Remota. As consultas podem retornar Recordsets e Recordsets editados podem atualizar a fonte de dados. Este tutorial não invoca o RDS com objetos ADO, mas é assim que seria se ele invocasse:

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

Parte A Suponha que, para esse caso, você tenha usado apenas o RDS.DataControl e que um objeto Recordset agora está associado ao RDS.DataControl. O método SubmitChanges atualiza a fonte de dados com quaisquer alterações no objeto Recordset se as propriedades Server e Connect ainda estiverem definidas.

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

Parte B Como alternativa, é possível atualizar o servidor com o objeto RDSServer.DataFactory, especificando uma conexão e um objeto 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

Este é o fim do tutorial.

Importante

A partir do Windows 8 e do Windows Server 2012, os componentes do servidor RDS não estão mais incluídos no sistema operacional Windows (confira Windows 8 e Manual de Compatibilidade do Windows Server 2012 para obter mais detalhes). Os componentes do cliente RDS serão removidos em uma versão futura do Windows. Evite usar esse recurso em desenvolvimentos novos e planeje modificar os aplicativos que atualmente o utilizam. Os aplicativos que usam o RDS devem migrar para o Serviço de Dados do WCF.

Consulte Também

Provedor de Comunicação Remota do Microsoft OLE DB (Provedor de Serviços do ADO)
Tutorial RDS
Tutorial RDS (VBScript)