Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Как экспо...

Тема: Как экспортировать структуру таблицы

15.06.2007 19:52:39

Сергей Слесарев

8 сообщения

Тема: Как экспортировать структуру таблицы

Здравствуйте! Помогите, пожалуйста, найти ответ на такой вопрос:
Требуется распечатать (или экспортировать в Word, Excel, .txt) структуру таблицы (Имя_поля, Тип_поля, Размер_поля, Описание_поля).
Мне надо было это сделать срочно, и пришлось сделать "кустарную" функцию
1) Есть ли возможность без программирования экспортировать или распечатать структуру таблицы.
2) Если нет, что за таблицы MSysAccessObjects, MSysACEs, и т.д.? По какому признаку их можно отличить от настоящих таблиц (кроме имени)?

Private Sub Command0_Click()
Dim Current_Table As TableDef
Dim Current_Field As Field
Dim Current_Field_Name As String
Dim Current_Field_Type As String
Dim Current_Field_Size As String
Dim Current_Field_Description As String
On Error GoTo 999
For Each Current_Table In DBEngine.Workspaces(0).Databases(0).TableDefs
Debug.Print Current_Table.Name
For Each Current_Field In Current_Table.Fields
Current_Field_Name = ""
Current_Field_Type = ""
Current_Field_Size = ""
Current_Field_Description = ""
With Current_Field
Current_Field_Name = .Name
Current_Field_Type = .Type
Current_Field_Size = .Size
Current_Field_Description = .Properties("Description").Value
End With
Debug.Print Current_Field_Name & "#" & Current_Field_Type & "#" & Current_Field_Size & "#" & Current_Field_Description
Next
Next
Exit Sub
999:
'Debug.Print Err.Description
Resume Next
End Sub
После этого, я загоняю текст (выведенный в окно Immediate) в Word, обрабатываю и распечатываю.

P.S. Общий раздел по таблицам
Автор: Сергей Слесарев от 25.09.2001 13:36:50 Источник ...

15.06.2007 19:52:39

All

4316 сообщения

RE: Как экспортировать структуру таблицы

1. Структуру полей таблиц лучше записать сначала в промежуточную таблицу, далее ее уже можно форматировать и распечатать в MsWord (см. Клиенты автоматизации la_automat.mdb)

P.S. Description - свойство поля может отсутствовать в таблице (см. подписку)

2. Системные таблицы. Используйте для отличия их от других таблиц название MSys* или проверяйте свойство таблицы, отвечающее за ее тип.

P.S. Общий раздел по таблицам
Автор: Виктор Конюков от 0:00:00 Источник ...

15.06.2007 19:52:39

Сергей Слесарев

8 сообщения

RE: Как экспортировать структуру таблицы

Большое спасибо за ответ и советы. Создавать напрямую документ Word из Access'а - это удобно и эффективно!
Дайте, пожалуйста, ещё одно небольшое уточнение.
Правильно ли я понял, что в Access НЕ существует встроенного механизма экспорта или печати структуры таблицы, и для реализации этой задачи необходимо писать собственную функцию?

P.S. Общий раздел по таблицам
Автор: Сергей Слесарев от 26.09.2001 10:55:30 Источник ...

Страница 1 из 1

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Как экспо...

Поиск

Список форумов

Начало | Forums