L
LAW
Параметры в SQL строке пишутся с символом ":" например:
INSERT INTO TABLE (FIELD1,FIELD2) values
VAL1,:VAL2,:VAL3)
INSERT INTO TABLE (FIELD1,FIELD2) values

ADOQuery2->SQL->Clear();
ADOQuery2->SQL->Add("Insert into perev (Название_орг, Договор, Сотрудники, Адрес, Телефон, Наименование, Срок_работ, Условие) values (:org, :dog, :sotrud, :adres, :tel, :naimen, :srok, :usl)");
AnsiString tmp_org="", tmp_dog="", tmp_sotrud="", tmp_adres="", tmp_tel="", tmp_naimen="", tmp_srok="", tmp_usl=""; //Здесь создаешь
//временные переменные для всех полей которые не должны быть(NB!!!)пустыми
//ADOQuery2->Active = true;
while(!ADOQuery1->Eof){
ADOQuery2->Parameters->ParamByName("org")->Value=ADOQuery1->Fields->Fields[0]->Value;
ADOQuery2->Parameters->ParamByName("dog")->Value=ADOQuery1->Fields->Fields[1]->Value;
ADOQuery2->Parameters->ParamByName("sotrud")->Value=ADOQuery1->Fields->Fields[2]->Value;
ADOQuery2->Parameters->ParamByName("adres")->Value=ADOQuery1->Fields->Fields[3]->Value;
ADOQuery2->Parameters->ParamByName("tel")->Value=ADOQuery1->Fields->Fields[4]->Value;
ADOQuery2->Parameters->ParamByName("naimen")->Value=ADOQuery1->Fields->Fields[5]->Value;
ADOQuery2->Parameters->ParamByName("srok")->Value=ADOQuery1->Fields->Fields[6]->Value;
ADOQuery2->Parameters->ParamByName("usl")->Value=ADOQuery1->Fields->Fields[7]->Value;
ADOQuery2->ExecSQL();
ADOQuery1->Next();
}
ADOQuery2->Prepare();
ADOQuery2->Unprepare();
ADOQuery2->IndexName="Название_орг";
ADOQuery2->SetKey();
ADOQuery2->FieldByName("Название_орг")->AsString="Значение которое ищем";
if (ADOQuery2->GoToKey())
{
Нашли
}
else
{
Не нашли
}
Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab