powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема форм и отчета
9 сообщений из 9, страница 1 из 1
Проблема форм и отчета
    #32701897
shoss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть формы Ф1, Ф2 и отчет. Ф2 открывается при нажатии кнопки из Ф1. В отчете выводятся данные из Ф2. Необходимо по нажатии кнопки в Ф2 вывести отчет только по текущей записи из этой формы. Пробовал так сделать: в отчете установил условие отбора по полю из Ф2. В Ф2 создал кнопку на вывод отчета текущей записи. Но теперь при открытии Ф1 выскакивает окно с требованием ввести содержание поля Ф2, по которому делается отбор в отчет. Как от него избавиться, чтобы все работало?
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32702063
Rivkin Dmitry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Приведи коды! Не гадать же на картах как ты там все делаешь...
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32704178
shoss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Привожу код:

Private Sub ПросмотрОтчета_Click()
On Error GoTo Err_ПросмотрОтчета_Click

Dim stDocName As String

stDocName = ChrW(1057) & ChrW(1095) & ChrW(1077) & ChrW(1090)
DoCmd.OpenReport stDocName, acPreview

Exit_ПросмотрОтчета_Click:
Exit Sub

Err_ПросмотрОтчета_Click:
MsgBox Err.Description
Resume Exit_ПросмотрОтчета_Click

End Sub
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32704182
shoss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
PS: Код для формы Ф2, которая открывается через Ф1
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32704239
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Хм... Есть форма Ф1. Как я понимаю на этой форме есть кнопка, которая открывает форму Ф2. Правильно?
Так, идем дальше ...
На форме Ф2 есть кнопка которая открывает отчет, с текущей записью.

Как я понял возник вопрос: почему при открытии формы Ф1 Access просит ввести данные для Ф2?

Ну наверное потому, что у вас в форме Ф1 где то при загрузке спрашиваются параметры из формы Ф2. Может быть в запросе, на котором основана Ф1, спрашивается это значение.

Для ответа дайте полную картину. Что у Вас MDB, ADP. Версия Access. Каким образом определяется текущая запись для отчета?
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32704275
shoss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Дело в том, что Ф1 построена на основе таблицы + два поля из отдельного запроса, а Ф2 - на запросе, специально созданном для нее. Правда для этого запроса использовались данные таблицы для Ф1. Для отчета у меня третий запрос, на одно из полей которого установлено условие отбора на совпадение с одноименным полем Ф2. Это поле нигде в Ф1 не встречается.
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32704278
shoss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да, и при открытии Ф1 Access требует ввести значение именно этого поля с Условием отбора.
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32704311
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторДело в том, что Ф1 построена на основе таблицы + два поля из отдельного запроса

Вот и посмотрите отдельный запрос. Может этот отдельный запрос берет данные из Ф2, а может быть он берет данные из другого запроса, который в свою очередь берет данные из Ф2 ...
А может быть у вас в запросе поле, ни с чем не связаное (пустое), но имя у него как и у поля в Ф2 ...
...
Рейтинг: 0 / 0
Проблема форм и отчета
    #32704317
shoss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо всем, кто откликнулся, но я решил проблему проще: у меня Ф2 открывается из Ф1 тоже с условием отбора по совпадающим полям. Я просто скопировал строчку кода в кнопку открытия отчета Ф2 и чуть-чуть видоизменил. Все работает.

Private Sub ПросмотрОтчета_Click()
On Error GoTo Err_ПросмотрОтчета_Click

Dim stDocName As String

stDocName = ChrW(1057) & ChrW(1095) & ChrW(1077) & ChrW(1090)

stLinkCriteria = "[КодЗаказа]=" & "'" & Me![КодЗаказа] & "'"
DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria

Exit_ПросмотрОтчета_Click:
Exit Sub

Err_ПросмотрОтчета_Click:
MsgBox Err.Description
Resume Exit_ПросмотрОтчета_Click

End Sub
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема форм и отчета
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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