ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переходы по записям в отчете
9 сообщений из 34, страница 2 из 2
  2  все
Переходы по записям в отчете
    #39485405
nataxa23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nataxa23
Гость
nataxa23кнопки то работают без ошибочно
мммда... поторопилась я отписаться по поводу ошибок. Ошибку я все же обнаружила, причем чисто случайно, если честно, такое сразу то так с кондочка и не увидеть:
Код: vbnet
1.
2.
3.
  DoCmd.SelectObject acReport, "Отчет1"
  DoCmd.RunCommand acCmdFitToWindow
  SendKeys "{PGDN}" 'PGUP/HOME/END


Я не знаю почему и у кого как, но у меня при срабатывании этого кода отключается/включается на клавиатуре NumLock
Т.е. получается, жму на кнопку NumLock включается, жму повторно - отключается. Если еще в добавок использовать не дай бог Zoom, то ваще какая то лажа смешанная получается (пардон за сленг).

В общем не понятно чета мне как сделать в дополнение к мелким кнопкам майкрософта свои большие кнопки для просмотра страниц.

Если кто все же знает способ программно, как можно реализовать переходы по страницам для просмотра отчета в предварительном просмотре, подскажите пожалуйста, буду ждать варианты предложений.
...
Рейтинг: 0 / 0
09.07.2017, 21:49
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39485411
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
nataxa23,
а всё ли вы проверили? а если вместо

SendKeys "{PGDN}"

использовать

SendKeys "{DOWN}"

то тоже NUMLOCK включается?
...
Рейтинг: 0 / 0
09.07.2017, 22:36
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39485982
nataxa23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nataxa23
Гость
guest_rusimportиспользовать
SendKeys "{DOWN}"
то тоже NUMLOCK включается?
да. Мне кажется тут дело не в том, какую выбирать клавишу, а в чем то другом. По хорошему правильно должно быть добраться до тех же самых команд, которые отвечают за переход по страницам или на худой конец этих мелких идиотских кнопок, которые оставил майкрософт по умолчанию, как то так примерно.
...
Рейтинг: 0 / 0
10.07.2017, 17:47
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39486050
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
nataxa23guest_rusimportиспользовать
SendKeys "{DOWN}"
то тоже NUMLOCK включается?
да. Мне кажется тут дело не в том, какую выбирать клавишу, а в чем то другом. По хорошему правильно должно быть добраться до тех же самых команд, которые отвечают за переход по страницам или на худой конец этих мелких идиотских кнопок, которые оставил майкрософт по умолчанию, как то так примерно.
Каких то особых команд, отвечающих за переход по страницам в режиме предпросмотра отчета попросту не существует. Если у вас компьютер так странно реагирует на SendKeys, то возможно поможет "костыль" - перед SendKeys "{DOWN}", ставить SendKeys "{NUMLOCK}".
...
Рейтинг: 0 / 0
10.07.2017, 19:18
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39486137
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
guest_rusimportnataxa23пропущено...

да. Мне кажется тут дело не в том, какую выбирать клавишу, а в чем то другом. По хорошему правильно должно быть добраться до тех же самых команд, которые отвечают за переход по страницам или на худой конец этих мелких идиотских кнопок, которые оставил майкрософт по умолчанию, как то так примерно.
Каких то особых команд, отвечающих за переход по страницам в режиме предпросмотра отчета попросту не существует. Если у вас компьютер так странно реагирует на SendKeys, то возможно поможет "костыль" - перед SendKeys "{DOWN}", ставить SendKeys "{NUMLOCK}".
если не поможет, то вот так ещё советуют
вот это в общий модуль
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long
 
' Определяет, изменчивое ли состояние у NumLock или нет
' Возвращает false - стабильный, true - изменчивый
Function Num_Not_Stable() As Boolean
 
    Dim keystat(0 To 255) As Byte
    Dim state As String
     
    GetKeyboardState keystat(0)
    state = keystat(vbKeyNumlock)
     
    If (state = 0) Then
     Num_Not_Stable = False
    Else
     Num_Not_Stable = True
    End If
End Function



а использовать так

Код: vbnet
1.
2.
3.
4.
5.
DoCmd.SelectObject acReport, "Отчет1"
DoCmd.RunCommand acCmdFitToWindow
DoEvents
If Num_Not_Stable() Then SendKeys "{NUMLOCK}"
SendKeys "{PGDN}"
...
Рейтинг: 0 / 0
10.07.2017, 22:39
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39500982
Вакшуль Сергей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вакшуль Сергей
Участник
guest_rusimportа использовать так
да, так работает стабильно
...
Рейтинг: 0 / 0
06.08.2017, 18:19
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39500991
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
Вакшуль Сергейguest_rusimportа использовать так
да, так работает стабильно
Спасибо, Сергей, за тестирование кода! А то наша дама меня в конец запутала:) Уж и не знаешь, что подумать :)
...
Рейтинг: 0 / 0
06.08.2017, 19:02
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39502250
Вакшуль Сергей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вакшуль Сергей
Участник
guest_rusimport,

Кстати,
Попалось на глаза:
http://access.mvps.org/access/api/api0046.htm

Функция mySendKeys
Там автор не только NumLock восстанавливает, но и другие функциональные клавиши
...
Рейтинг: 0 / 0
09.08.2017, 02:56
| Ответить | Цитировать | Написать  
Переходы по записям в отчете
    #39502256
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
Вакшуль Сергейguest_rusimport,

Кстати,
Попалось на глаза:
http://access.mvps.org/access/api/api0046.htm

Функция mySendKeys
Там автор не только NumLock восстанавливает, но и другие функциональные клавиши
Да, спасибо, Сергей! Я тоже натыкался на это решение, но поскольку ТС о других клавишах молчала, то решил ограничиться приведённым мной решением.
...
Рейтинг: 0 / 0
09.08.2017, 04:38
| Ответить | Цитировать | Написать  
9 сообщений из 34, страница 2 из 2
  2  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переходы по записям в отчете
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39502250&tid=1612201]:
 0ms
get settings:
 8ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 53ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 13ms
total:  149ms
созд. / загр.: 149ms
x
x
Закрыть


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