Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как вывести на форме в виде таблицы результат запроса? VBA, Access / 8 сообщений из 8, страница 1 из 1
30.01.2013, 02:23
    #38129978
Charles Weyland
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
На форме нарисовал кнопочку. На VBA написал программу, которая формирует SQL запрос. Хочу, чтобы на форме, под кнопочкой (видимо, в дочерней форме) выводилась таблица. Как это сделать?
...
Рейтинг: 0 / 0
30.01.2013, 07:55
    #38130030
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
Наверное, проще всего использовать объект MSFlexGrid (MSHFlexGrid) .
...
Рейтинг: 0 / 0
30.01.2013, 10:14
    #38130137
Charles Weyland
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
AndreTMНаверное, проще всего использовать объект MSFlexGrid (MSHFlexGrid) .
Да, это правда.. Но проблема в том, что я хочу в качестве дочерней формы использовать "красивую" таблицу. В виде отчёта, например.
У дочернего объекта есть свойство .SourceObject. Чё-то я в него ничего впихнуть не могу.
Также есть свойство .Reports.RecordSet и .Reports.SourceObject . Ни туда, ни туда ничего не вставляется...
...
Рейтинг: 0 / 0
30.01.2013, 11:08
    #38130209
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
Charles Weyland,

объект-источник для случая отчета, надо записывать в виде Report.ИмяОтчета
Код: vbnet
1.
.ИмяКонтролаКонтейнера.SourceObject="Report.ИмяОтчета"
...
Рейтинг: 0 / 0
30.01.2013, 11:51
    #38130302
Charles Weyland
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
о, отлично.
А как этому самому отчёту сказать: "Select ..... From. ..where"? Или просто Where, чтобы он отображал не весь список, а только часть из него
...
Рейтинг: 0 / 0
30.01.2013, 12:05
    #38130330
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
Достаточно удобно пользоваться свойствами контрола-контейнера LinkMasterFields и LinkChildFields (Основные и подчиненные поля в русской локали). В основных полях записываются имена полей главной формы через точку с запятой, в подчиненных - соответствующие поля отчета. Инструмент фильтрует набор данных подчиненного объекта по значениям этих полей связи.
...
Рейтинг: 0 / 0
30.01.2013, 12:18
    #38130355
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
Другой способ - непосредственно в коде задавать источник подотчету. Типа такого
Код: vbnet
1.
Me.ИмяКонтролаКонтейнера.Report.RecordSource = "select * from [Таблица] where Поле=" & Me.ПолеФильтра
...
Рейтинг: 0 / 0
16.09.2013, 21:21
    #38398139
oleg_krm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести на форме в виде таблицы результат запроса? VBA, Access
сделал вот так
Код: vbnet
1.
2.
3.
4.
5.
6.
    
    sql = "...;"
    Dim tmpQueryDef As QueryDef
    Set tmpQueryDef = CurrentDb.CreateQueryDef("tmpQueryDef", sql)
    DoCmd.OpenQuery "tmpQueryDef", acNormal, acReadOnly
    CurrentDb.QueryDefs.Delete tmpQueryDef.Name


Получилось сделать запрос с параметрами из формы, при этом результат запроса будет
показан автоматически и также автоматически удален. Результат будет доступен для просмотра,
пока не будет закрыто окно запроса. Очень удобно, не нужны отдельные контейнеры, после выполнения
никаких следов не остается.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как вывести на форме в виде таблицы результат запроса? VBA, Access / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]