
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
25.12.2003, 12:38
|
|||
|---|---|---|---|
|
|||
Формат блобов системных таблиц.... System tables BLOB format |
|||
|
#18+
Привет! Кто нибудь знает формат блобов системных таблиц ?!?!? Например для чтения кода всех функций из одного модуля... И тоже самое для форм... С наилучшими... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
25.12.2003, 12:50
|
|||
|---|---|---|---|
|
|||
Формат блобов системных таблиц.... System tables BLOB format |
|||
|
#18+
А почему надо именно из BLOB читать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
25.12.2003, 12:55
|
|||
|---|---|---|---|
|
|||
Формат блобов системных таблиц.... System tables BLOB format |
|||
|
#18+
хммм... Тогда вопрос поставлю по другому: Как прочитать код всех функций из модулей Аксесса? И как прочитать описания форм? Я думал - они в блобах... Если посмотреть в MSysModules.Module - то там видны некоторые участки кода... но не весь... видимо он в каком-то формате... вот собственно и интересует - как так взять и прочитать декларации и тела самих функций... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
25.12.2003, 13:07
|
|||
|---|---|---|---|
|
|||
Формат блобов системных таблиц.... System tables BLOB format |
|||
|
#18+
Вот ведь людей тянет со всякой ерундой (типа системных таблиц) возится. То таблицы линкуют через MSysObjects, то модули читают через MSysModules. Для кого библиотеки писаны - загадка... Смотри хелп к классу Module, семейству Modules и св-вам Form.Module и Report.Module ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
25.12.2003, 13:36
|
|||
|---|---|---|---|
|
|||
Формат блобов системных таблиц.... System tables BLOB format |
|||
|
#18+
Для примера, вывод в окно отладки Public Function ParseModules() Dim objVBComponent As Object Dim i As Long For Each objVBComponent In Application.VBE.ActiveVBProject.VBComponents ' Debug.Print objVBComponent.Name For i = 1 To objVBComponent.CodeModule.CountOfLines Debug.Print " " & objVBComponent.CodeModule.Lines(i, 1) Next i Next objVBComponent End Function ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=45&mobile=1&tid=1677453]: |
0ms |
get settings: |
11ms |
get forum list: |
11ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
47ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
23ms |
get tp. blocked users: |
1ms |
| others: | 233ms |
| total: | 341ms |

| 0 / 0 |
