Запросы SQL к базе данных являются важным этапом проектирования. Практически нет ни одного случая, чтобы разработчики их не использовали.
Они нужны для фильтрации и сортировки данных, для редактирования и удаления записей. Часто используют запросы и в коде программы. Поэтому изучите эти простые примеры для работы с записями базы данных через VBA
В этом примере мы создадим 2 запроса SQL и сохраним их в базе данных. Первый запрос будет создан для выборки некоторых значений из таблицы, а второй для удаления значений из списка калькулятора.
На этой форме в Access 2016 показано, как можно выбрать запрос и его изменить. Для этого используйте иконку Конструктор запросов.
|
Dim dbs As Database, sSQL As String
On Error GoTo 999 'Переходим по ошибке
funCreateQueries = False 'Возвращаем результат при ошибке
subDeleteQuery "ЗапросСписокКалькулятора" 'Удяляем старый запрос
subDeleteQuery "ЗапросУдалитьСписок" 'Удяляем старый запрос
dbs = appAccess.CurrentDb 'Выбираем базу данных
With dbs
sSQL = "SELECT Выражение, Итог FROM Калькулятор ORDER BY " & _
"Пункт DESC;"
.CreateQueryDef("ЗапросСписокКалькулятора", sSQL) 'запрос на выборку
sSQL = "DELETE Калькулятор.* FROM Калькулятор;"
.CreateQueryDef("ЗапросУдалитьСписок", sSQL) 'запрос на удаление
End With
funCreateQueries = True 'Возвращаем результат
Exit Function 'Выходим из программы
999:
MsgBox Err.Description 'Сообщаем об ошибке
Err.Clear() 'Очищаем поток от ошибок
End Function
ОГЛАВЛЕНИЕ | ССЫЛКИ ПО ТЕМЕ |
Загрузить исходники по теме (скоро …)
|
Комментариев нет:
Отправить комментарий