Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
224 / 45 / 11
Регистрация: 24.02.2015
Сообщений: 197
1

Источник записей отчета

24.02.2015, 14:52. Показов 759. Ответов 2
Метки нет (Все метки)

Добрый день!
Имеется кнопка на форме, которая вызывает предварительный просмотр отчета
Visual Basic
1
2
3
Private Sub rep_vip_Click()
  DoCmd.OpenReport "поступление", acViewPreview, , "[dmigr] is null and [dvip] between DateValue([forms]![Отчет по приемным].[s]) And DateValue([forms]![Отчет по приемным].[po])"
End Sub
источник записей отчета задается группой переключателей на этой форме
Visual Basic
1
2
3
4
5
6
7
8
Private Sub Report_load()
  If [Forms]![Отчет по приемным].[base] = 2 Then
    name1 = "adult"
  Else: name1 = "children"
  End If
  sq = "select * from " & name1
  Me.RecordSource = sq  
End Sub
Возникает ошибка 2191: Невозможно задать значение свойства "Источник записей" после начала печати.
Если в качестве режима отчета выбрать acViewReport, то ошибок не возникает, но нужен именно acViewPreview. В чем проблема?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.02.2015, 14:52
Ответы с готовыми решениями:

Источник записей отчета
Добрый день! В таблице БД было поле типа OLE, в котором хранились документы MS WORD. Проблема...

Задать источник записей для отчета
Всем добрый день! :) Хочется реализовать следующее, а умишек не нажил. Есть Форма1, в ней 3...

Источник записей ListBox
Пожалуйста, подскажите: как правильно давать ссылку на источник записей для элемента управления...

Источник записей в форме
Подскажите пожалуйста, если я в форме Потребность в детали на план выпуска изделий посчитала по...

2
Эксперт MS Access
26705 / 14385 / 3190
Регистрация: 28.04.2012
Сообщений: 15,783
24.02.2015, 15:04 2
Перенесите код на событие открытия Open. На Load уже поздно менять источник.

В режиме acViewReport код не выполняется. Поэтому и ошибок нет
1
224 / 45 / 11
Регистрация: 24.02.2015
Сообщений: 197
24.02.2015, 16:10  [ТС] 3
Изначально ставила на Open, но тогда на строчке DoCmd.OpenReport вылетала ошибка 2501: Прервано выполнение макрокоманды OpenReport

Добавлено через 3 минуты
Цитата Сообщение от mobile Посмотреть сообщение
В режиме acViewReport код не выполняется. Поэтому и ошибок нет
Но источник записей менялся

Добавлено через 26 минут
Да, еще, когда ставишь на Open и открываешь отчет "вручную", выдает:
Выражение Открытие, введенное в поле свойства события, вызывает ошибку: Procedure declaration does not math description of event or procedure having the same name
Может это поможет выявить ошибку

Добавлено через 27 минут
Усё, работает! Как всегда, ошибки "в запятых" - забыла аргумент (Cancel As Integer) у Open прописать. Тему можно закрыть.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.02.2015, 16:10

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Источник записей для формы
Возможно ли в качестве источника записей для формы использовать одновременно несколько НЕ СВЯЗАННЫХ...

Сумма при группировке в отчёте и источник записей
Решил домучить отчёт. 2 вопроса: 1. Можно ли в источник записей для формы/отчёта внедрить...

Access 2013: источник записей для формы
День добрый. Вопрос по Аксесс ВБА: может ли источником записей для формы являться рекордсет? ...

Изменяем источник записей для подчиненной формы
Можно с помощью VBA изменять источник данных (таблицы) для подчиненной формы. Например в Поле со...

Как программно изменять источник записей у формы
К примеру если флажок=true то источник строк у формы изменять?

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


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.