|
|
|
Как узнать имена таблиц в Acces через DAO?
|
|||
|---|---|---|---|
|
#18+
надежнее от лебонда до убонда :0). еще один. Не массив TableDefs. НЕ МАССИВ! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.04.2004, 17:05 |
|
||
|
Как узнать имена таблиц в Acces через DAO?
|
|||
|---|---|---|---|
|
#18+
А разве у коллекций есть лебонд? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.04.2004, 17:07 |
|
||
|
Как узнать имена таблиц в Acces через DAO?
|
|||
|---|---|---|---|
|
#18+
Опппппоздал. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.04.2004, 17:07 |
|
||
|
Как узнать имена таблиц в Acces через DAO?
|
|||
|---|---|---|---|
|
#18+
Ну дак про тебледефсы не спорю. Паспешил непрухой поделиться. Не вник. Но и на коллекшены тоже проруха быват:0): Код: plaintext 1. 2. 3. 4. 5. 6. 7. ?tCollection 1 1 1 т.е. бывают "пральные" и "непральные" коллекции. Вот вшитые коллекции акса и Дао - "праильные" а объект VBA.коллекшн - кривой какой-то :0). Вот токо жалко, что лябонды для их нет. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.04.2004, 17:51 |
|
||
|
Как узнать имена таблиц в Acces через DAO?
|
|||
|---|---|---|---|
|
#18+
Кстати, эта процедура вполне годится для проверки, откуда нумеруется коллекция. function MyLBound(c as collection)as integer dim v as variant '(а может, object?) on error resume next v=c(0) if err=0 then MyLBound=0 exit function endif err=0 v=c(1) if err=0 then MyLBound=1 else MyLBound=-1 '(значит, коллекция пустая) endif end function ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.04.2004, 17:58 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32475985&tid=1675439]: |
0ms |
get settings: |
8ms |
get forum list: |
21ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
170ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
56ms |
get tp. blocked users: |
1ms |
| others: | 211ms |
| total: | 487ms |

| 0 / 0 |
