Страница: 1 |
Привет уважаемые База-то простенькая - Access
Страница: 1 |
Вопрос: Управление таблицами и полями с помощью кода
Добавлено: 15.06.04 00:58
Автор вопроса: Фродо
Есть пара не освещенных вопросов к знатокам.
Объясните пожалуйста, как можно с помощью кода:
1. Получить колличество таблиц в базе
2. Получить имена таблиц в базе
3. Получить колличество полей в таблице
4. Получить имена полей в таблице
5. Удалить поле из таблицы
6. Добавить поле в таблицу
7. Удалить таблицу из базы. * уже нашел
Там ничего особенного быть не должно
Как таблицу удалить я уже понял
DataBase.TableDefs.Delete "TabelName"
А как в этом же стиле удалить Поле?
Спасибо за участие
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Snake
ICQ: 302130238
Вопросов: 16
Ответов: 39
Профиль | | #1
Добавлено: 15.06.04 08:44
для DAO
Set dbs = DBEngine.OpenDatabase(NameDB)
Debug.Print "Кол-во таблиц :" & dbs.TableDefs.Count
Debug.Print "Имена таблиц:"
For i = 0 To dbs.TableDefs.Count - 1
 ebug.Print dbs.TableDefs(i).Name & "(" & dbs.TableDefs(i).Fields.Count & ""
For j=0 to dbs.TableDefs(i).Fields.Count-1
 ebug.Print dbs.TableDefs(i).Fields.Name & ", "
next j
 ebug.Print ""
Next i
Ну и всё в таком духе, используя TableDefs Collection или/и Recordset Object
а 5. Удалить поле из таблицы
6. Добавить поле в таблицу
ИМХО делать через SQL запрос надо,используя ALTER TABLE:
Удаление
dbs.Execute "ALTER TABLE DROP имя_столбца/поля"
Добавление
dbs.Execute "ALTER TABLE ADD имя_столбца/поля тип_поля"