Известно, что Акцес скидывает значения глобальных переменных при ошибках. Как это обойти? Навскидку думаю создавать в какой-нибудь, скажем, скрытой форме одноименные поля, в которые и складывать значения. Есть ли способ лучше?

Есть в некоем модуле объявление типа

Public MyVar as byte

В процессе работы что-нибудь туда кладу

Private Sub Function Butt1_Click()
MyVar = 1
...

Дальше генерицца (против моего желания, конечно:) ошибка. После этого в MyVar будет 0.

2ЛП
Логично. Но ведь я не всегда знаю, где будет ошибка :)) и посему не всегда могу ее обработать.

Нехорошо. Во-первых, я заранее не знаю, сколько и каких переменных буду использовать, поэтому создавать в этой табличке новые поля - еще хуже, чем добавить поле в форму. Во-вторых, к этим переменным я буду обращаться и в запросах, и в циклах. Что быстрее - обратиться к полю открытой формы, или открыть таблицу, прочитать ее запись и посмотреть содержимое поля?

А если переменная - объект...

А нек..й объекты в глобальных переменных хранить тогда! Или же надо бояться...

2TatianaT

> сколько у тебя есть глобальнных переменных? 20? 40? 100?

Да не знаю. Сегодня 100, завтра 101 и т.д.
Или при каждом запуске убивать таблицу и создавать новую?

>а после какой ошибки Асесс сбрасывает значение глобальных переменных?

В каком-нить модуле:
Public MyVar as byte

В какой-нить форме:

Private Sub Function Butt1_Click()
MyVar = 1
MsgBox MyVar
MyVar = "qwerty"

Вылезает ошибка. Очумевший пользователь после n-й попытки понимает, что после нажатия на кнопку Debug надо перезагружаться, а после End - все вроде-бы работает.

Так вот после нажатия на End переменная MyVal становится равной 0.

2ЛП
Согласен. Но ведь за всем не уследишь. И непременно профукаешь САМУЮ ГЛАВНУЮ переменную. Обидно, да. Поэтому и хочу от греха хранить их "сбоенезависимо".

> Нет, это не я лох позорный \r
Зар-раза \r
\r
> Ты зачем вообще оставил пользователю доступ к исходному коду??? \r
> Тебе шаловливые пользователи никогда код не правили что-ли? \r
\r
Да не везде я могу писать mde!\r
/topic/40756\r
Кроме того, моя организация имеет деньгу с абонентской поддержки, т.е. программы постоянно находятся в стадии разработки. И не мне это менять.\r
\r
> Вот ведь лень до чего доводит... \r
> Пробегись по всем своим "Private Sub Function Butt1_Click" и впихатй туда\r
> обработку ошибок. Тогда и в код не будет падать, и переменные не будут\r
> сбрасываться. \r
> Писать надо сбоенезависимо\r
Плин, да я и так это знаю. Вопрос здесь не только и не столько о моем природном идиотизме, а о хранении глобальных переменных. Если ты скажешь, что в твоих программах в принципе не бывает ошибок, я сам готов собрать тебе памятник из пивных бутылок (невысокий).

Владимиру Санычу:
Согласен. Но некоторые переменные (к примеру текущая организация или р/с) могут меняться в процессе работы в неизвестных местах. И если окажется, что последние пара записей внесены не так, как ожидалось, то (мне) может стать мучительно больно.

2Pavel и остальные.

Я в первую очередь исхожу из посылки, что могу в том или ином месте забыть поставить обработчик (что, естественно, переодически и происходит). Или, не дай бог, будет дописывать кто-нибудь еще, кто не знает об этой особенности Access'a.

2ЛП
> Сбросить галку "Просмотр програм после ошибки" в параметрах запуска.
Ок. Спасибо.

>> Если ты скажешь, что в твоих программах в принципе не бывает ошибок
> Я скажу что в моих программах не бывает необработанных ошибок.
> Разницу чуешь?

Чую. Но это справедливо только для обкатанных некоторое время программ. А у меня, повторюсь, программы постоянно "в стадии разработки". Важный фактор - моя неопытность в акцессе.

2Senin Viktor
По первой части согласен полностью, я так и делаю сейчас. Но "сбоенезависимость", думаю, мне все-таки нужна. И, скорее, реализованная посредством формы, а не таблицы.

"Private Sub Function Butt1_Click()"
Во как...

2ЛП
Потому и искал в свое время приблуду для аксеса хр, которая вставляет обработчик сама. По моему, эта приблуда должна быть в девелопере.
Интересно. Свистни, пожалуйста, если встретишь ее.

Блин ладно глобальные переменные теряются
У меня в форме приватные переменные сбрасываются. Может, кто с таким чудом сталкивался?
На открытии формы куда-то лезу, что-то читаю и запоминаю некое значение (чтобы потом не делать эту работу опять). В какой-то момент енто запомненое значение становится 0/False/vbNullString/Nothing независимо от того каким было прежде. Закрытие/открытие формы все ставит на свои места, но ведь это неправильно.
Самая жопа то, что происходит это в Новосибирске, а я в Москве :)
Помогите кто чем может, сами мы не местные :)
Access 97, mde, унаследована куча кода без нормальной обработки ошибок. Т.е. сам access вынужден ловить необработанные ошибки и выдавать msgbox'ы, есть предположение что в такие моменты проект и сбрасывается

Хехе :) Постройка памятника отменяется.

Тпру!
Злостный идиотизм.

В открытую форму, будь она неладна, нельзя добавлять контролы. Делать таки посредством таблицы? А как?

Если посредством "[название переменной], [строка-значение переменной], [тип переменной]", долгим будет чтение - поиск и преобразование к нужному типу.
Если способом ТатьяныТ, получаем ограничение на количество переменных, плюс при добавлении новой переменной менять структуру таблицы.
А если все-же в форме? Т.е. если добавляем несуществующую переменную, то открываем форму в режиме конструктора, создаем поле, сохраняем форму, и открываем ее. Чтобы при этом не пропадало содержимое переменной, храним его не в Value, а в DefaultValue. А кстати, может все время держать эту форму в режиме конструктора? Т.е. можно ли открыть форму в режиме конструктора так, чтобы ее не было видно, и на нее нельзя было попасть?

Посмотрим...

Разруха - она в головах (с) Собачье сердце
Сам дурак. :)

Ты уж определись в какой момент и кто добавляет чувствительные (к возможным глюкам) глобальные переменные
Уже определился. Я. И, возможно, буратинки. Еще раз повторяю, задача(и) все время дописываются. Сегодня не нужна переменная, завтра понадобится.

И вот еще:
"Про ответы
1. Лучше хамский ответ, чем никакого.
2. Лучше никакого ответа, чем хамский.
3. Лучше получить на мыло готовый проект."
(с) Витал.

Если нечего подсказать или нет желания это делать, так зачем клавиатуру мозолить?

Сделал новую глобальную переменную - добавил контрол на форму. В чем проблема???
В лени. Я уже написал процедуру, которая сама добавляет контрол, а завтра забуду об этой скрытой форме, с ее контролами, т.к. думать мне об ней уже не нафих не нужно. А послезавтра эту процедуру воткну в другую программу, тоже не разбираясь, как там она работает.

Сам дурак.

Это правильная лень :)

Пока канавы копаешь - не забудь про ограничение на максимальное количество контролов на форме
Сколько? :(

И вот еще: у формы есть что-нить типа Dirty, а то она повадилась сохраняться?

2ЛП
Хехе
но все равно, 400 > 250.

А за пивом она еще не повадилась бегать?
А за пивом я щас сам побегу :)) (или, может, что покрепче все-таки?... - риторический вопрос)

2ТатьянаТ
А я народу уже хором из одного голоса дружно ответил, что ошибки стараюсь отслеживать, но во избежание хочу сделать именно в форме или таблице.

2All
А вообще, конечно, как всегда спасибо. Идеи пригодились. Сейчас пойду до дому и все доделаю и отшлифую.

2лп
>Поля добавлять можно только если с этой таблицей никто не работает. А так как там глобальные переменные хранятся - она будет постоянно занята.

Такую таблицу надо хранить в клиентской части.

>Гео, пока канавы копаешь - не забывай про ограничение на максимальное количество полей в таблице. А то вдруг забудешь - пошлют унитазы чистить
И все-таки неправильно так разговаривать. <Здесь была написано ответное оскорбление, вырезал за ненадобностью>

2ЛП
Но все равно. Даже в клиентской части - чтобы таблицу модифицировать на ходу, надо чтобы на ней даже никакой рекордсет не висел. А это убивает все надежды на оптимизацию по скорости (каждое чтение глобальных переменных сопровождается открытием/закрытием DAO рекордсета)
Это да.

Кто в армии служил - тот в цирке не смеется?
Да, уж. Опять тянет что-нить написать, но опять не буду. Это не к топику, это если только на "лестницу".

2ТатьянаТ
...сверяет номер в txt файле и на лейбле и если не совпадают то эта версия затирается и на её место копируется с сервера новая версия
И что?

2wara
Конечно, лучше, видимо. Но совсем не использовать, наверное, не получиться.

2ТатьянаТ
Все равно не очень понятно. Если ты говоришь именно о копировании новой версии с добавленными полями для хранения переменных, то да. Такую штуку я собираюсь делать чуть позже и немного по-другому. А идея в том, чтобы как раз впоследствии не делать лишних фрикций. Захотел добавить новую глобальную переменную - написал SetGlobalVar("NameVar",123) и она сама проверит, есть такая переменная или нет, и создаст ее, если надо. Сейчас я трачу на это день + получаю ваши ценные советы, а за пару лет сэкономлю недели.

2wara
Ну, в общем, да. Если в таблице, то, как справедливо сказал Лох, ее придется каждый раз открывать, а не хранить в переменной, иначе оная переменная сама станет глобальной и к тому же объектной. Даже если хранить их скажем, в списке, а не в таблице, то каждая из функций должна сначала найти нужную строку. А в случае с полями в форме, работа по поиску нужного поля полностью лежит на самом Аксесе.

Кроме того, процедура ДобавитьПеременную() я включу в состав ИзменитьПеременную().