Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Просмотр отчета щелкнув по кнопке / 6 сообщений из 6, страница 1 из 1
29.07.2004, 15:18:24
    #32627427
illusory
illusory
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Просмотр отчета щелкнув по кнопке
На форме есть кнопка для просмотра отчета. Форма открывается для просмотра одной записи (номер записи вводится), щелкая по кнопке для, просмотра отчета, сново появляется окно о введении номера. Форма и отчет опираются на запрос. Как сделать так чтобы окно не выскакивало перед открытием отчета?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.07.2004, 15:48:20
    #32627529
Rivkin Dmitry
Rivkin Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Просмотр отчета щелкнув по кнопке
Я бы разделил запросы. В форме оставить тот же запрос с параметром, а в запрос отчета вместо параметра вставил значение номера записи или ключа с формы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.07.2004, 15:53:20
    #32627545
Буба Касторский
Буба Касторский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Просмотр отчета щелкнув по кнопке
Нечто вроде:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
...
Private Sub ButtonReport.Click()

Dim wcnd as String

If Me.ctrlNum.Value<> '' and IsNumber(CDbl(Me.ctrlNum.Value)) Then
 
wcnd = "id = " & Me.ctrlNum.Value
DoCmd.OpenReport "MyReport", acNormal, , wcnd
End if

End Sub
...

Где id - поле отчета, по которому идет отбор, ctrlNum - имя контрола, в котором хранится значение указанного номера, ButtonReport - имя кнопки.

Только в запросе, по которому строится отчет, придется убрать параметризованное условие ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.07.2004, 15:55:38
    #32627550
Буба Касторский
Буба Касторский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Просмотр отчета щелкнув по кнопке
Блин, давно не писал. Правильно не апострофы, а кавычки...

Код: plaintext
If Me.ctrlNum.Value<>"" and IsNumber(CDbl(Me.ctrlNum.Value)) Then
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.07.2004, 16:20:50
    #32627621
illusory
illusory
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Просмотр отчета щелкнув по кнопке
Ругается на IsNumber
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.07.2004, 16:36:05
    #32627669
Буба Касторский
Буба Касторский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Просмотр отчета щелкнув по кнопке
Ч-черт..забылось все :-)
попробуй IsNumeric или в хэлп загляни
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Просмотр отчета щелкнув по кнопке / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 293ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1672847]:
 0ms
get settings:
 8ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 42ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 23ms
get tp. blocked users:
 1ms
others: 198ms
total:  293ms
x
x
Закрыть


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