Шаг 2. Вызовите программу сервера (учебник по RDS)
При вызове метода на прокси-сервере клиента метод выполняется фактической программой на сервере. На этом шаге вы выполните запрос на сервере.
Важно!
Начиная с Windows 8 и Windows Server 2012 серверные компоненты RDS больше не включаются в операционную систему Windows (дополнительные сведения см. в Windows 8 и Windows Server 2012 совместимости). Клиентские компоненты RDS будут удалены в будущих версиях Windows. Избегайте использования этого компонента в новых разработках и запланируйте изменение существующих приложений, в которых он применяется. Приложения, использующие RDS, должны перейти в службу данных WCF.
Часть А Если вы не использовали RDSServer.DataFactory в этом руководстве, наиболее удобным способом выполнения этого шага было бы использование RDS. Объект DataControl . RDS. DataControl объединяет предыдущий шаг создания прокси-сервера, а на этом шаге — выдачу запроса.
Задайте RDS. Свойствоserver объекта DataControl для определения места создания экземпляра серверной программы; Свойство Connect для указания строки подключения для доступа к источнику данных; и свойство SQL для указания текста команды запроса. Затем выполните метод Refresh , чтобы серверная программа подключилась к источнику данных, извлекла строки, указанные в запросе, и возвращала объект Recordset клиенту.
В этом руководстве не используется RDS. DataControl, но если бы он выглядел следующим образом:
Sub RDSTutorial2A()
Dim DC as New RDS.DataControl
DC.Server = "https://yourServer"
DC.Connect = "DSN=Pubs"
DC.SQL = "SELECT * FROM Authors"
DC.Refresh
...
В этом руководстве также не вызывается RDS с объектами ADO, но в этом случае он будет выглядеть следующим образом:
Dim rs as New ADODB.Recordset
rs.Open "SELECT * FROM Authors","Provider=MS Remote;Data Source=Pubs;" & _
"Remote Server=https://yourServer;Remote Provider=SQLOLEDB;"
Часть Б Общий метод выполнения этого шага заключается в вызове метода query объекта RDSServer.DataFactory. Этот метод принимает строку подключения, которая используется для подключения к источнику данных, и текст команды, который используется для указания строк, возвращаемых из источника данных.
В этом руководстве используется метод Query объекта DataFactory:
Sub RDSTutorial2B()
Dim DS as New RDS.DataSpace
Dim DF
Dim RS as ADODB.Recordset
Set DF = DS.CreateObject("RDSServer.DataFactory", "https://yourServer")
Set RS = DF.Query ("DSN=Pubs", "SELECT * FROM Authors")
...
См. также:
Шаг 3. Сервер получает набор записей (учебник по RDS)
Учебник по RDS (VBScript)