powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Есть функция возвращающая названия столбцов в таблице?
6 сообщений из 6, страница 1 из 1
Есть функция возвращающая названия столбцов в таблице?
    #32434035
Qwasiliy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть 12 таблиц. В них куча столбцов.
Требуется названия большей части столбцов закинуть в один столбик в отдельной таблице, при чем названия эти зачастую повторяются, но не все.

Может есть функция возвращающая названия столбцов в таблице?
Знает кто-нибудь??

Если не сложно, продублируйте на мыло ответ...
...
Рейтинг: 0 / 0
Есть функция возвращающая названия столбцов в таблице?
    #32434036
Фотография Alexander G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Штатной нет. Написать самому несложно.
Ориентировочно как это делается можно посмотреть, к примеру здесь
am.rusimport.ru/MsAccess/topic.aspx?ID=269
...
Рейтинг: 0 / 0
Есть функция возвращающая названия столбцов в таблице?
    #32434039
grigorii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Public Function eeee()
Dim r1 As Recordset
Set r1 = CurrentDb.OpenRecordset("select * from ИмяТаблицы")
MsgBox r1.Fields(1).Name ''''имя столбца номер 1
r1.close
End Function
...
Рейтинг: 0 / 0
Есть функция возвращающая названия столбцов в таблице?
    #32434078
Фотография Green2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть системный каталог.

То есть системная таблица, в которой перечислены все таблицы и столбцы в таблиах.
...
Рейтинг: 0 / 0
Есть функция возвращающая названия столбцов в таблице?
    #32434080
Фотография Green2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Извини, перепутал с SQL Server, в ACCESS тоже есть системный кталог, но он скрыт. И кроме тоо, системный каталог в Access меняется с каждой новой версией.
...
Рейтинг: 0 / 0
Есть функция возвращающая названия столбцов в таблице?
    #32434124
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
    Dim rst As ADODB.Recordset
    Set rst = CurrentProject.Connection.OpenSchema(adSchemaColumns, Array(Empty, Empty,  "Таблица1" ))
    Do Until rst.EOF
        Debug.Print rst!Table_Name, rst!Column_Name
        rst.MoveNext
    Loop
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Есть функция возвращающая названия столбцов в таблице?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]