Введение в курс "Базы данных" - Операции в БД (VBA)

E-mail Печать PDF
Рейтинг пользователей: / 9
ХудшийЛучший 
Индекс материала
Введение в курс "Базы данных"
Классификация БД по их использованию
Реляционные БД (MS Access)
Ключи
Связи между таблицами
Неформальные методы приведения таблиц к третьей нормальной форме
Операции в БД (VBA)
Операции над записями
SQL
Оператор Select
DISTINCT
FROM
Группировка
Объединение таблиц
Параметры
Перекрёстные запросы
Обновление данных
Удаление данных
Подчинённые запросы
Создание таблиц
Добавление новых полей
Tехнология разработки программного обеспечения, использующего базы данных
Доступ к данным в VB 6.0
Работа с записями
Отчёты в VB6
Доступ к данным в C++ Builder
Отчёты в C++ Builder
Создание многоуровневых приложений
Доступ к данным в C# (Visual Studio 2005)
Создание отчётов
OLAP технологии. XML язык
SQL Server
Триггер
Программирование триггера
XML
Все страницы

Операции в БД (VBA)

Операции над отношениями/таблицами

1.      Операции создания таблицы/отношения

a.      Имя таблицы,

b.     Создание коллекции полей (значение имён полей, их типов, длины и пр.)
Создание таблицы программно:
Dim db as Database
Dim tb as Tabledef
Dim fil as Field
Set db = CurrentDb   - присоединение объекта к открытой БД
Set tb = db.CreateTableDef("ct")  - создание таблицы
Set fil = tb.Createfield("имяПоля", dbtext, 40) - создание текстового поля длиной 40
tb.fields.Append fil - добавление в конец таблицы созданного поля
Set fil = tb.Createfield("код", dblong)
fil.attributes = dbAutoIncrement
tb.fields.Append fil
:
tb.Fields.Refresh - сохранение изменений в таблице
db.tableDefs.Append tb - добавление таблицы в БД в конец коллекции
Set tb = Nothing - освобождение памяти

2.      Операция создания индекса.
Dim ind as Index
Set db = CurrentDb
set tb = db.TableDefs("ct")
Set ind = tb.CreateIndex("ind1") - создание индекса
ind.Primary = true - делаем индекс первичным
Set fil = ind.CreateField("код",dbLong) - создаём поле индекса
ind.Fields.Append  fil
tb.Indexes.Append ind
tb.Indexes.Refresh

3.      Открытие таблицы с помощью команды DoCmd, в которой хранятся все макрокоманды.
DoCmd.OpenTable "ct", acViewDesign - открытие таблицы в режиме конструктора

4.      Открытие индекса.

5.      Операция выбора таблицы (SetFocus).

6.      Выбор источника данных для формы.
Me.RecordSource = "ct"

7.      Закрытие таблицы. Может происходить без сохранения и с сохранением (операция Close с параметрами; операция Update).

8.      Удаление таблицы.
db.TableDefs.Delete "ct"

9.      Удаление индекса.



 

Добавьтe Ваш комментарий

Ваше имя (псевдоним):
Ваш адрес почты:
Заголовок:
Комментарий: