Как можно переместить всю строку в другую таблицу при помощи запроса

@Sasha · Регистрация: 05.06.2008

Студворк — интернет-сервис помощи студентам

Как можно переместить всю строку в другую таблицу при помощи запроса зная значение одного поля?

C++
1
2
3
4
5
6
7
8
ADOQuery2->Close();
ADOQuery2->SQL->Clear();
ADOQuery2->SQL->Text = "CREATE TABLE Recycled (Invent_Number int  PRIMARY KEY,Number_in_Lan varchar(50),Department varchar(50),Processor varchar(50),Memory varchar(50),HDD varchar(50),Room varchar(50),Windows_98 varchar(50),Windows_2000 varchar(50),Windows_XP varchar(50),Other varchar(50))";
ADOQuery2->ExecSQL();
ADOQuery2->Close();
ADOQuery2->SQL->Clear();
ADOQuery2->SQL->Add("INSERT INTO Recycled SELECT *FROM Glavnaya WHERE Invent_Number = '44444'");
ADOQuery2->ExecSQL();

При таком коде вылетает ошибка о несоответствии типов
И как можно переместить выделенную строку в таблице в другую таблицу?
Заранее благодарен за ответы

@Sasha · 11.10.2015, 18:55 **[ТС]**

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

а как все это сделать через adotable?

NextGen25, ADOTable не предназначен для запросов

@xxbesoxx · 15.10.2015, 12:44

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

как все это сделать через adotable?

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 ADOTable2->Insert();
 ADOTable2->FieldByName("Fio")->AsString = ADOTable1->FieldByName("Fio")->AsString;
 ADOTable2->FieldByName("Telefn")->AsString = ADOTable1->FieldByName("Telefn")->AsString;
 ADOTable2->FieldByName("Adres")->AsString = ADOTable1->FieldByName("Adres")->AsString;
 ADOTable2->Post();
}

@NextGen25 · 15.10.2015, 15:16

спасибо)

Новые блоги и статьи Все статьи Все блоги /
GitHub Copilot в JetBrains: модель по умолчанию, Fix и контроль MCP and_y87 12.10.2026 10 октября 2026 года GitHub обновил Copilot для JetBrains: добавил настройки стартовой модели, исправления из диагностики и управление автозапуском MCP. Поддержка IDE 2025. 1 прекращена — требуется. . .	GitHub Copilot в JetBrains: модель по умолчанию, Fix и контроль MCP and_y87 12.10.2026 10 октября 2026 года GitHub обновил Copilot для JetBrains: добавил настройки стартовой модели, исправления из диагностики и управление автозапуском MCP. Поддержка IDE 2025. 1 прекращена — требуется. . .	День 5 из 28: Codex подсказывает следующий запрос and_y87 12.10.2026 9 октября 2026 года OpenAI запустила бету Composer predictions — подсказок следующего сообщения в текущем диалоге Codex. Это помощь с формулировкой запроса, а не автоматическое продолжение задачи. . . .	Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .

@NextGen25 2 / 2 / 3 Регистрация: 01.03.2015 Сообщений: 131
	15.10.2015, 15:16
	спасибо) 0