Код | ADOQuery1->SQL->Clear(); ADOQuery1->SQL->Add("insert into tbParks(PK_Identificator)"); ADOQuery1->SQL->Add("select max(PK_identificator)+1 from tbParks"); ADOQuery1->SQL->Add("update tbParks set PK_title = " + Form6->Edit1->Text + " , Pk_short= " + Form6->Edit2->Text + " ,"); ADOQuery1->SQL->Add("PK_KP = 0, PK_includedate = getdate(), PK_TimeVoditBefore_1 = 0, PK_TimeVoditBefore_2 = 0, PK_TimeVoditBefore_C = 0, PK_TimeVoditBefore_R = 0, PK_TimeVoditBefore_O = 0, PK_TimeVoditAfter_1 = 0, PK_TimeVoditAfter_2 = 0, PK_TimeVoditAfter_C = 0, PK_TimeVoditAfter_R = 0, PK_TimeVoditAfter_O = 0, PK_Pref=(select max(PK_pref)+1 from tbParks)"); ADOQuery1->SQL->Add("where PK_identificator= (select max(PK_identificator) from tbParks)"); ADOQuery1->ExecSQL();
|
ошибка возле конструкции " ," Код | ADOQuery1->Parameters->ParamByName("NNname")->Value=Form6->Edit1->Text; ADOQuery1->Parameters->ParamByName("shNNname")->Value=Form6->Edit2->Text; ADOQuery1->SQL->Clear(); ADOQuery1->SQL->Add("insert into tbParks(PK_Identificator)"); ADOQuery1->SQL->Add("select max(PK_identificator)+1 from tbParks"); ADOQuery1->SQL->Add("update tbParks set PK_title = :NName , Pk_short= :shNNname ,"); ADOQuery1->SQL->Add("PK_KP = 0, PK_includedate = getdate(), PK_TimeVoditBefore_1 = 0, PK_TimeVoditBefore_2 = 0, PK_TimeVoditBefore_C = 0, PK_TimeVoditBefore_R = 0, PK_TimeVoditBefore_O = 0, PK_TimeVoditAfter_1 = 0, PK_TimeVoditAfter_2 = 0, PK_TimeVoditAfter_C = 0, PK_TimeVoditAfter_R = 0, PK_TimeVoditAfter_O = 0, PK_Pref=(select max(PK_pref)+1 from tbParks)"); ADOQuery1->SQL->Add("where PK_identificator= (select max(PK_identificator) from tbParks)"); ADOQuery1->ExecSQL();
|
параметр NNname not found Код | ADOQuery1->SQL->Clear(); ADOQuery1->SQL->Add("insert into tbParks(PK_Identificator)"); ADOQuery1->SQL->Add("select max(PK_identificator)+1 from tbParks"); ADOQuery1->SQL->Add("update tbParks set PK_title = 'NName' , Pk_short= 'shNNname' ,"); ADOQuery1->SQL->Add("PK_KP = 0, PK_includedate = getdate(), PK_TimeVoditBefore_1 = 0, PK_TimeVoditBefore_2 = 0, PK_TimeVoditBefore_C = 0, PK_TimeVoditBefore_R = 0, PK_TimeVoditBefore_O = 0, PK_TimeVoditAfter_1 = 0, PK_TimeVoditAfter_2 = 0, PK_TimeVoditAfter_C = 0, PK_TimeVoditAfter_R = 0, PK_TimeVoditAfter_O = 0, PK_Pref=(select max(PK_pref)+1 from tbParks)"); ADOQuery1->SQL->Add("where PK_identificator= (select max(PK_identificator) from tbParks)"); ADOQuery1->ExecSQL();
|
а так все работает. подскажите как с этими параметрами быть?
|