030. Использование QueryDef(запросы с параметрами)

MyTetra Share

Делитесь знаниями!

Ссылка на оригинал

Время создания: 16.03.2019 23:43

Раздел: Разные закладки - VBA - Access - leadersoft.ru

Запись: xintrea/mytetra_db_adgaver_new/master/base/1531371180wsy046nuvk/text.html на raw.githubusercontent.com

Очень частов базах данных используются запросы с параметрами. В этом примере дано 2 варианта их применения.

Все примеры Microsoft Access

dim q as dao.querydef
dim txt as stringtxt="select ... where val='" & Me.Val & "'"
set q=currentdb.querydefs("MyQ")
q.sql=txt
set q=nothing
docmd.Openquery "MyQ"

/*
'Dim dbs As DAO.Database
'Dim qdf As DAO.QueryDef
'
'Set dbs = CurrentDb
'Set qdf = dbs.QueryDefs("МойЗапросСПараметром")
'qdf.Parameters("ПараметрВЗапросе") = 1
*/

Так же в этом разделе:

MyTetra Share v.0.65