powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переименовать поля в таблице
7 сообщений из 7, страница 1 из 1
Переименовать поля в таблице
    #32078442
Sfag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Можно ли как нить переименовать поля в таблице с помощью VBA
И ещё вопросик как перебрать все компоненты в форме/репорте и переименовать их с помощью того же VBA

Заранее спасибо
Sfagnum
...
Рейтинг: 0 / 0
Переименовать поля в таблице
    #32078504
Фотография Sinner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ежели не ошибаюсь Basic не есть DDL (последний как раз столбцы и переименовывает)
Вариант, лежащий на поверхности - добавить новое поле через
ALTER TABLE Table ADD Field_New
Перенести данные через UPDATE Table set Field_New = Field
а затем
просто удалить ненужный
ALTER TABLE Table DROP COLUMN Field
DoCmd.RunSQL "текст запроса"

по моему так

а для "пройтись по контролам" можеть помочь For Each цикл по семейству чего-либо подробно в хелпе читайте...
...
Рейтинг: 0 / 0
Переименовать поля в таблице
    #32078928
Sfag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибки
Попробую
...
Рейтинг: 0 / 0
Переименовать поля в таблице
    #32079765
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
To sinner
первое не помогло
проблема на самом деле в том, что я не знаю какие поля в таблице и мне важно узнать как они называються шоб потом заменить там не угодные мне буковки именно в названии поля
...
Рейтинг: 0 / 0
Переименовать поля в таблице
    #32079862
Erika
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>> проблема на самом деле в том, что я не знаю какие поля в таблице и мне важно узнать как они называються шоб потом заменить там не угодные мне буковки именно в названии поля

А можно поинтересоваться целью переименования?
Просто, ежели нужно в именах полей и таблиц заменить русские буквы на английские - то есть надстройка на сайте Александра Новикова (по-моему для Acc97, но точно не уверена), которая в свое время лично мне здорово помогла.
...
Рейтинг: 0 / 0
Переименовать поля в таблице
    #32079934
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>>проблема на самом деле в том, что я не знаю какие поля в таблице и мне важно узнать как они называються шоб потом заменить там не угодные мне буковки именно в названии поля


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Dim dbs As Database, tdf As TableDef, fld As Field
Set dbs = CurrentDb
For Each tdf In dbs.Tabledefs

If Left$(tdf.Name, 4 )<> "MSys"  Then

For Each fld In tdf.Fields

Debug.Print fld.Name

Next

End If

Next
...
Рейтинг: 0 / 0
Переименовать поля в таблице
    #32081606
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
То Erika
Не не русские

То AlexJuice
Пасибки
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переименовать поля в таблице
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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