Как избежать открытия окон с процедурами

@FFFF · Регистрация: 09.04.2010

Author24 — интернет-сервис помощи студентам

Можно ли, чтобы при возникновении ситуации, когда открывается отладчик, запретить вывод его на экран.

Т.е. когда работает очень любопытный оператор, который может кое-куда влезть, так вот чтобы в такой ситуации программа прекращала работу и все, но не открывала окна с процедурами?

Но запрет я должен снять и восстановить, то что оператор навредил.

Благодарю.

@Claustrofob · 07.04.2011, 10:10

наверное

на машине оператора при инсталяции Аксес не следует ставить VBA (...).

@Vadim_ig · 07.04.2011, 17:31

Проблема шибко любопытных оператов решается созданием mde-файла. (конечно, при этом у себя под рукой исходник иметь надо и не забывать, что декомпилировать если что получится вряд ли)

@Михайло · 07.04.2011, 18:42

Достаточно в начале каждой подрограммы написать:

On Error Goto 1

а в конце этой подпрограммы (перед End Sub или End Function) написать

Exit Sub
1:
MsgBox 'Ошибка ввода'
DoCmd.Close типОбъекта, имяОбъекта, acSaveNo

При этом используете следующие аргументы:

Аргумент Описание

типОбъекта..... Одна из следующих встроенных констант:
............... acDefault (значение по умолчанию)
............... acForm (форма)
............... acMacro (макрос)
............... acModule (модуль)
............... acQuery (запрос)
............... acReport (отчет)
............... acTable (таблица)

В результате любая ошибка будет приводить к закрытию объекта (формы/отчёта) с предварительным выводом сообщения

@FFFF · 07.04.2011, 22:31 **[ТС]**

РЕбята, благодарю.
1. У меня база разделена с программным кодом и при попытке создания файла.MDE пишет, что не может создать его. Это так должно быть?
2. Если создан файл.MDE, то можно вводить данные в базу или только чтение? У меня база должна быть открыта для режима изменений.

3. Михайло, скажите если у меня в одной форме, допустим, 20 процедур, то я должен во всех добавить эти строки, что бы получить желаемый разультат?

Благодарю.

@Михайло · 08.04.2011, 11:22

Не сомненно, в каждой подпрограмме.

MDE у Вас не создаётся в следствие наличия синтаксических ошибок в тексте программ. Чтобы найти все эти ошибки откройте любой модуль и выберите в меню Microsoft Visual Basic 'Debug'/'Compile'.

@Михайло · 08.04.2011, 11:22

Не сомненно, в каждой подпрограмме.

MDE у Вас не создаётся в следствие наличия синтаксических ошибок в тексте программ. Чтобы найти все эти ошибки откройте любой модуль и выберите в меню Microsoft Visual Basic 'Debug'/'Compile'.

@FFFF · 08.04.2011, 15:04 **[ТС]**

Михаил, благодарю.
Буду искать ошибки.

@FFFF 1 / 1 / 0 Регистрация: 09.04.2010 Сообщений: 459
		1
	Как избежать открытия окон с процедурами 06.04.2011, 22:20. Показов 895. Ответов 7 Метки нет (Все метки) Можно ли, чтобы при возникновении ситуации, когда открывается отладчик, запретить вывод его на экран. Т.е. когда работает очень любопытный оператор, который может кое-куда влезть, так вот чтобы в такой ситуации программа прекращала работу и все, но не открывала окна с процедурами? Но запрет я должен снять и восстановить, то что оператор навредил. Благодарю. 0

@Claustrofob 0 / 0 / 0 Регистрация: 06.12.2009 Сообщений: 37
	07.04.2011, 10:10	2
	наверное на машине оператора при инсталяции Аксес не следует ставить VBA (...). 0

@Vadim_ig 1 / 1 / 1 Регистрация: 05.01.2010 Сообщений: 235
	07.04.2011, 17:31	3
	Проблема шибко любопытных оператов решается созданием mde-файла. (конечно, при этом у себя под рукой исходник иметь надо и не забывать, что декомпилировать если что получится вряд ли) 0

@Михайло 118 / 118 / 10 Регистрация: 12.05.2010 Сообщений: 1,207
	07.04.2011, 18:42	4
	Достаточно в начале каждой подрограммы написать: On Error Goto 1 а в конце этой подпрограммы (перед End Sub или End Function) написать Exit Sub 1: MsgBox 'Ошибка ввода' DoCmd.Close типОбъекта, имяОбъекта, acSaveNo При этом используете следующие аргументы: Аргумент Описание типОбъекта..... Одна из следующих встроенных констант: ............... acDefault (значение по умолчанию) ............... acForm (форма) ............... acMacro (макрос) ............... acModule (модуль) ............... acQuery (запрос) ............... acReport (отчет) ............... acTable (таблица) В результате любая ошибка будет приводить к закрытию объекта (формы/отчёта) с предварительным выводом сообщения 0

@FFFF 1 / 1 / 0 Регистрация: 09.04.2010 Сообщений: 459
	07.04.2011, 22:31 [ТС]	5
	РЕбята, благодарю. 1. У меня база разделена с программным кодом и при попытке создания файла.MDE пишет, что не может создать его. Это так должно быть? 2. Если создан файл.MDE, то можно вводить данные в базу или только чтение? У меня база должна быть открыта для режима изменений. 3. Михайло, скажите если у меня в одной форме, допустим, 20 процедур, то я должен во всех добавить эти строки, что бы получить желаемый разультат? Благодарю. 0

@Михайло 118 / 118 / 10 Регистрация: 12.05.2010 Сообщений: 1,207
	08.04.2011, 11:22	6
	Не сомненно, в каждой подпрограмме. MDE у Вас не создаётся в следствие наличия синтаксических ошибок в тексте программ. Чтобы найти все эти ошибки откройте любой модуль и выберите в меню Microsoft Visual Basic 'Debug'/'Compile'. 0

@FFFF 1 / 1 / 0 Регистрация: 09.04.2010 Сообщений: 459
	08.04.2011, 15:04 [ТС]	8
	Михаил, благодарю. Буду искать ошибки. 0