Кнопки команд адресной книги

Статья
11/09/2018

Приложение адресной книги включает следующие кнопки команд:

Кнопка Найти для отправки запроса в базу данных.
Кнопка «Очистить» для удаления содержимого текстовых полей перед началом нового поиска.
Кнопка Обновить профиль для сохранения изменений в записи сотрудника.
Кнопка Отмена изменений, чтобы сбросить изменения.

Важный

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

Кнопка "Найти"

Нажатие кнопки "Найти " активирует процедуру Find_OnClick VBScript, которая создает и отправляет SQL-запрос. Нажатие этой кнопки заполняет сетку данных.

Создание SQL-запроса

Первая часть подпрограммы Find_OnClick создает SQL-запрос, одну фразу за раз, добавляя текстовые строки к глобальной инструкции SQL SELECT. Она начинается с задания переменной myQuery инструкции SQL SELECT, которая запрашивает все строки данных из таблицы источника данных. Затем вложенная процедура сканирует каждый из четырех полей ввода на странице.

Поскольку программа использует слово like при создании инструкций SQL, запросы выполняют поиск подстрок, а не для точных совпадений.

Например, если поле Фамилия содержит запись "Berge" и поле Title содержит запись "Program Manager", инструкция SQL (значение myQuery) будет выглядеть так:

Select FirstName, LastName, Title, Email, Building, Room, Phone from Employee where lastname like 'Berge%' and title like 'Program Manager%'

Если запрос выполнен успешно, все лица с фамилией, содержащей текст "Berge" (например, Berge и Berger) и с заголовком, содержащим слова "Program Manager" (например, Program Manager, Advanced Technologies), отображаются в сетке данных HTML.

Подготовка и отправка запроса

Последняя часть процедуры Find_OnClick Sub состоит из двух инструкций. Первая инструкция назначает свойство SQL объекта RDS.DataControl равным динамически созданному SQL-запросу. Вторая инструкция заставляет объект RDS.DataControl (DC1) выполнить запрос к базе данных и затем отобразить новые результаты запроса в сетке.

Sub Find_OnClick  
   '...  
   DC1.SQL = myQuery  
   DC1.Refresh  
End Sub

Кнопка "Обновить профиль"

Нажатие кнопки "Обновить профиль" активирует процедуру VBScript Update_OnClick, которая выполняет объект RDS.DataControl (DC1) методы SubmitChanges и Refresh.

Sub Update_OnClick  
   DC1.SubmitChanges  
   DC1.Refresh  
End Sub

При выполнении DC1.SubmitChanges служба удаленных данных упаковает все сведения об обновлении и отправляет его на сервер через HTTP. Обновление — это принцип «всё или ничего»: если часть обновления завершается неудачно, изменения не применяются, и выдается сообщение о статусе. DC1.Refresh не требуется после SubmitChanges с удаленной службой данных, но это гарантирует обновлённые данные.

Кнопка "Отмена изменений"

Щелчок на кнопке Отмена изменений активирует процедуру VBScript Cancel_OnClick Sub, которая выполняет метод RDS.DataControl объектаDC1)CancelUpdate.

Sub Cancel_OnClick  
   DC1.CancelUpdate  
End Sub

При выполнении DC1.CancelUpdate удаляет все изменения, внесенные пользователем в запись сотрудника в сетке данных с момента последнего запроса или обновления. Он восстанавливает исходные значения.

См. также

Навигационные кнопки адресной книги
объект DataControl (RDS)

Поделиться через