Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Просмотр отчета щелкнув по кнопке  [new]
illusory
Member

Откуда:
Сообщений: 41
На форме есть кнопка для просмотра отчета. Форма открывается для просмотра одной записи (номер записи вводится), щелкая по кнопке для, просмотра отчета, сново появляется окно о введении номера. Форма и отчет опираются на запрос. Как сделать так чтобы окно не выскакивало перед открытием отчета?
29 июл 04, 15:18    [845964]     Ответить | Цитировать Сообщить модератору
 Re: Просмотр отчета щелкнув по кнопке  [new]
Rivkin Dmitry
Member

Откуда: Israel
Сообщений: 5500
Я бы разделил запросы. В форме оставить тот же запрос с параметром, а в запрос отчета вместо параметра вставил значение номера записи или ключа с формы.
29 июл 04, 15:48    [846173]     Ответить | Цитировать Сообщить модератору
 Re: Просмотр отчета щелкнув по кнопке  [new]
Буба Касторский
Guest
Нечто вроде:

...
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 - имя кнопки.

Только в запросе, по которому строится отчет, придется убрать параметризованное условие ...
29 июл 04, 15:53    [846200]     Ответить | Цитировать Сообщить модератору
 Re: Просмотр отчета щелкнув по кнопке  [new]
Буба Касторский
Guest
Блин, давно не писал. Правильно не апострофы, а кавычки...

If Me.ctrlNum.Value<>"" and IsNumber(CDbl(Me.ctrlNum.Value)) Then
29 июл 04, 15:55    [846213]     Ответить | Цитировать Сообщить модератору
 Re: Просмотр отчета щелкнув по кнопке  [new]
illusory
Member

Откуда:
Сообщений: 41
Ругается на IsNumber
29 июл 04, 16:20    [846347]     Ответить | Цитировать Сообщить модератору
 Re: Просмотр отчета щелкнув по кнопке  [new]
Буба Касторский
Guest
Ч-черт..забылось все :-)
попробуй IsNumeric или в хэлп загляни
29 июл 04, 16:36    [846438]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить