Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Как определить список всех столбцов в таблице Access

20K
05 июля 2007 года
ANNDRR
12 / / 17.01.2007
Как определить список всех столбцов в таблице Access?
И еще - не потребуется ли менять такой запрос в случае если количество столбцов увеличится?
375
05 июля 2007 года
dominator
199 / / 16.10.2003
Цитата: ANNDRR
Как определить список всех столбцов в таблице Access?
И еще - не потребуется ли менять такой запрос в случае если количество столбцов увеличится?



Не потребуется.
SELECT * FROM Table1

20K
05 июля 2007 года
ANNDRR
12 / / 17.01.2007
Спасибо!
А такой вопрос - если необходимо получить только список имен всех столбцов, за исключением двух столбцов А и Б
308
05 июля 2007 года
Комаджу
850 / / 26.07.2006
SELECT C,D,n FROM table1
20K
05 июля 2007 года
ANNDRR
12 / / 17.01.2007
Данный запрос подразумевает что мне известны имена столбцов С, D?
Но заранее их имена могут быть не известны - проблема в том что в таблицу периодически будут добавлятся новые столбцы...
308
05 июля 2007 года
Комаджу
850 / / 26.07.2006
В MS SQL можно рискнуть реализовать такое, через системную таблицу. Но как это обстоит в Access, я не знаю.
375
06 июля 2007 года
dominator
199 / / 16.10.2003
Цитата: ANNDRR
Данный запрос подразумевает что мне известны имена столбцов С, D?
Но заранее их имена могут быть не известны - проблема в том что в таблицу периодически будут добавлятся новые столбцы...



Немного не понятно, как все это у тебя будет происходить. Ну добавил кто-то в таблицу новый столбец. Но ты же всегда можешь посмотреть его имя тем же SELECT * FROM ... А потом сформируешь тот запрос, какой тебе нужен.

294
08 июля 2007 года
Plisteron
982 / / 29.08.2003
Цитата: ANNDRR
Спасибо!
А такой вопрос - если необходимо получить только список имен всех столбцов, за исключением двух столбцов А и Б



А на чём пишется алгоритмическая часть? В VBA можно

Код:
Sub GetFields()
    Dim con As ADODB.Connection
    Dim adoxCat As New ADOX.Catalog
    Dim adoxTable As ADOX.Table
    Dim adoxTableColumns As ADOX.Columns

    Dim i As Integer
    Dim l As Integer

    Set con = Application.CurrentProject.Connection
    Set adoxCat.ActiveConnection = con
    Set adoxTable = adoxCat.Tables("dummy")
    Set adoxTableColumns = adoxTable.Columns
    l = adoxTableColumns.Count
    For i = 0 To l - 1
        Debug.Print adoxTableColumns(i).Name
    Next i
End Sub

Не забудь подключить в References Microsoft ActiveX Data Objects 2.8 Library и Microsoft ADO Ext. 2.8 for DDL and Security.
Ещё несколько ссылок:
http://www.c-gator.ru/articles/adox-mdb-csharp/
http://hiprog.com/index.php?option=com_content&task=view&id=251661555&Itemid=35
http://msdn2.microsoft.com/en-us/library/aa704826.aspx
http://msdn2.microsoft.com/en-us/library/ms681520.aspx
http://www.codeproject.com/books/186100558x_16.asp
20K
10 июля 2007 года
ANNDRR
12 / / 17.01.2007
Огромное спасибо! Это именно то что и нужно было!:)
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог