ADO изменение поля

[glebast]

Всем добра.
У меня имеется таблица Учащиеся и в ней есть поле Класс (значения 5А, 5Б, 10Г и т.д.) вот как можно реализовать с помощью ADO перевод всех учащихся в следующий класс.

Я пока сделал таким способом, но очень коряво и много писать надо,

ADOQuery1.SQL.Text:=('Update Ученики set Класс = "6А" where Класс = "5А"');

может кто знает способо по програмистски)

[Аватар]

А это он и есть способо по програмистски

[Serge_Bliznykov]

я бы структуру переделал.

как минимум, добавил таблицу Класс
в ней поля

ID, НомерКласса Буква ГодНачалаОбучения 

в таблице Ученики ссылка на эту таблицу (idКласса).
При переходе в следующий класс изменяем только номер класса в таблице Класс

а как максимум, вычислял номер класса по началу году обучения и текущему учебному году. Тогда update при переходе в следующий класс вообще не понадобился бы!

[Stilet]

очень коряво

В чем корявость?

[Serge_Bliznykov]

Сообщение от Stilet

В чем корявость?

ручками написать для всех классов и ВСЕХ букв классов (говоряд, бывают классы с буквами не только А Б В и Г, но и Д, Е...
при этом учитывать, что нужно СТРОГО соблюдать последовательность перехода: сначала убрать все старшие классы (11-е), потом 10е перевести в 11е, потом 9-е перевести в 10 и т.д.
всё это выполняется МНОЖЕСТВОМ ОТДЕЛЬНЫХ запросов (по каждому классу и каждой букве), если не пользоваться транзакциями (откат/commit), то прервав процесс на середине, получим кучу учеников, которые непонятно в каком классе учатся.
Вот это и называется КОРЯВО.

p.s. предложенный мною способ будет состоять из одного UPDATE:

update Класс 
  set НомерКласса = НомерКласса + 1;

ну и ещё одного запроса, чтобы убрать (пометить, перенести в архив, удалить и т.п. для того класса, который стал 12-м - т.е. выпускной класс, ученики которого вышли из стен школы)

[Аватар]

То же самое для 5А, 5Б, 10Г можно сделать и так (думаю что у ТС Access)

update Класс 
  set НомерКласса = CStr(CInt(Left(НомерКласса,Len(НомерКласса)-1))+1)+Right(НомерКласса,1);

хотя несомненно то, что Серж предлагает удобнее

[Stilet]

ручками написать для всех классов и ВСЕХ букв классов

А-а-а... Ну да. Изменять конечно именование классов - жестяк.
Согласен - справочник наименований классов тут уместен.