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

🚨 29 мая стартует курс «Пентест Active Directory: от теории к практике» от Академии Кодебай
🔍 Изучите реальные техники атак на инфраструктуру Active Directory: от первоначального доступа до полной компрометации.
🛠️ Освойте инструменты, такие как BloodHound, Mimikatz, CrackMapExec и другие.
🧪 Пройдите практические лабораторные работы, имитирующие реальные сценарии атак.
🧠 Получите знания, которые помогут вам стать востребованным специалистом в области информационной безопасности.После старта курса запись открыта еще 10 дней Подробнее о курсе ...
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
{
Не нашли
}
Обучение наступательной кибербезопасности в игровой форме. Начать игру!