Добрый день, уважаемые программисты и просто пользователи MS Access.
У меня несложный, надеюсь, вопрос. Если Панугр заглянет, буду рад его мнению.

Проблема - при выполнении кода виснет форма, откуда этот код запускали. Намертво, с сообщением "Not Responding" Но! При этом код продолжает выполняться, процедура большая, емкая, по ее окончании все нормально, форма оживает, результат на лицо, можно работать дальше. На форме предусмотрена минимальная анимация, ну в лейбл выводится счетчик цикла, чтобы пользователь понимал, что идет работа. Но вот все встает колом и ничего не обновляется спустя сотню циклов.

Подозреваю, что плохо работаю с ресурсами, память, процессор, что-то переполняется. Хотя загрузка процессора на уровне 14 процентов, память тоже отьедает не слишком.

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


Подскажите пожалуйста, что нужно улучшить, какие средства для этого есть в арсенале VBA.

Благодарю, пошел изучать

booby,
В данном случае запрос уникален тем, что это единственный раз в жизни, когда понадобился и полностью оправдан именно запрос из категории "сложный". Сколько ни программировал ранее (ладно, непрофессионально) но никогда не случалось чтобы нельзя было обойтись простыми запросами. И вот такое.

Задача простая вроде бы - есть куча народу, 1000 человек, есть календарный месяц, 30 дней (как правило), есть места приписки каждого человека. Приписка эта меняется произвольное количество раз и на произвольное количество дней за произвольный период времени (с даты найма индивида). Есть журнал, в котором содержится вся история о том, к какому обьекту был (и есть) приписан человек.

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

Решение. Цикл по каждому человеку и каждому дню месяца. С выполнением этого сложного запроса. Красота решения в том, что процедура получилась очень компактная, и просто хирургически точная, 100 попаданий из 100, ни одной ошибки за все время работы.

vmag,
Применил DoEvents в процедуре поиска информации по текстовым файлам. 9600 файлов обрабатываются, каждый построчно.
поставил DoEvents через 200 файлов. Да, помогло, работает нормально, ни мышь ни клавиатуру не дергаю, просто смотрю. Выполнение спотыкается, видимо все же желательно сократить интервал до 100-150. Но инструкция пугает что этот метод сильно тормозит процесс, и так общее время получилось минуты 4-5
У меня возникает дополнительный интерес, хорошо, вот момент передачи процесса оперсистеме известен, а как поймать момент возврата управления ядру Access? Есть такая возможность?

Спасибо всем откликнувшимся.

Панург,
Прописки нет, есть статус, по нему живи, где хочешь (или где можешь)

Панург,
В Канаде есть такая штука, живешь и живи. Государство знает о тебе ровно то, что ты сообщил и коммуницирует с тобой по указанному адресу. Если адрес меняется, то ты должен в установленное время оповестить госслужбы (налоговая, полиция (для прав) и еще там некоторые ) о новом адресе. Например для прав установлен строк 6 дней. (если не путаю). Потому, что адрес прямо в правах и написан. Если этого не сделать, то права будут не совсем действительны. Права кстати перевыпускаются. Раньше, лет 10 назад, на почте можно было заказать услугу такую, сообщаешь им новый адрес и они рассылают куда надо. Сейчас не знаю, ужа наверное электронные сервисы есть.
У меня правда вопрос иногда возникает, а если ты живешь в трейлере и перемещаешься в нем, то какой адрес тогда? Фиг его знает.
Ну то такое, ладно.

booby,
Ну, как говорится, нет предала совершенству, я тоже, когда приступал, думал аналогично, что сейчас вжик, и одним запросом всех выведу на чистую воду. Но по мере погружения в задачу энтузиазм поубавился. Я конечно не дам голову на отсечение, что одним запросом не решить, но и, пардон муа, ставку на удачное решение такого рода тоже не сделаю. Тем более что там такой нюанс, что этот процесс делается немного задним числом, за отчетный период вроде того. И к моменту когда он собирается, в журнале уже набегают новые записи о новых назначениях на новые места работников. Так что еще и диапазон дат нужно держать как строй на бородинском поле.