Отключить выполнение команд повешенных на AcadDocument_Activate() - Страница 3
| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Отключить выполнение команд повешенных на AcadDocument_Activate()

Отключить выполнение команд повешенных на AcadDocument_Activate()

Ответ
Поиск в этой теме
Непрочитано 20.05.2011, 09:44
Отключить выполнение команд повешенных на AcadDocument_Activate()
Ольга_DG
 
Регистрация: 20.05.2011
Сообщений: 10

Здравствуйте!
Я написала программу, которой в качестве исходных данных вводится папка, из которой она берет файлы, открывает их по чтению и считывает нужные данные и записывает в xml-файл. Но попадаются файлы, на которых она останавливается. В этих файлах прописан код при открытии AcadDocument_Activate. Что нужно сделать чтобы она не останавливалась?
Может существуют какие системные переменные AutoCADa которые отключат выполнение макроса при отрытии файла? Подскажите пожалуйста!

ПРИМЕР КОДА

Private Sub AcadDocument_Activate()
Dim VBEModel As Object
Dim i As Integer
Dim bLoad As Boolean
Dim FileName As String
bLoad = True
FileName = Application.Preferences.Files.TemplateDwgPath & "\AcadMirage.dvb"
Set VBEModel = VBE
For i = 1 To VBEModel.VBProjects.Count
If StrComp(VBEModel.VBProjects(i).Name, "ACADMirage", vbTextCompare) = 0 Then
bLoad = False
Exit For
End If
Next i
If bLoad Then LoadDVB FileName
Application.RunMacro VBEModel.VBProjects(i).Name + ".Mirage.MenuMirage"
End Sub

Этот код выполняется при открытии файла. КАК избавится от его выполнения?

Последний раз редактировалось Ольга_DG, 20.05.2011 в 10:45. Причина: изменения
Просмотров: 8428
 
Непрочитано 20.05.2011, 20:37
#41
Олег (jr.)

специалист по околачиванию грушевых деревьев
 
Регистрация: 14.09.2004
Pietari, Venäjä
Сообщений: 811


Цитата:
Сообщение от gomer Посмотреть сообщение
ручки за такое поотбивал... Афтару... либо во всех файлах меняйте переменную bLoad = True на bLoad = false
либо попробуйте убивать событие чуть раньше... например во время EndOpen
Читай по буквам
Цитата:
Это не подходит т.к. в другом файле будет другой код. и еще мне не надо его выполнять, у меня свой запущен и должен выполняться. я же писала: файлов тысячи штук я с них списываю информация в xml-файл.
Олег (jr.) вне форума  
 
Непрочитано 20.05.2011, 21:06
#42
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Дело не в коде убивать нужно событие
gomer вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Отключить выполнение команд повешенных на AcadDocument_Activate()



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Что нужно чтобы отключить Отопление в квартире? Колян Отопление 96 30.01.2019 13:58
запуск программы из AutoCADа kminas Программирование 19 15.06.2012 13:42
Есть ли в Автокаде 2008 клавиша перебора команд, ранее введенных в командной строке? onick AutoCAD 4 13.11.2010 21:25
В русской версии AutoCAD 2010 SP1 32-bit файл Acad.PGP содержит ошибки. hwd Баги и пожелания в Autodesk 21 21.04.2010 20:27
Комбинации клавиш для команд в AutoCAD 2006 Artiznov AutoCAD 3 03.03.2006 15:23