как нам тяжело новичкам

← →
регинка (2006-12-20 15:40) [0]

я сделала так
ADOQuery4.Active:=False;
ADOQuery4.SQL.Clear;
ADOQuery4.SQL.Add("Insert(select NUM_DOC,DATE_DOC,PAYMENT_TYPE,PAYER_INN, ");
ADOQuery4.SQL.Add("PAYER_NAME,ibank2.payment.KPP,AMOUNT,PAYER_ACCOUNT,PAYER_BANK _NAME,");
ADOQuery4.SQL.Add( "PAYER_BANK_BIC,PAYER_BANK_ACC,RCPT_NAME,RCPT_INN,");
ADOQuery4.SQL.Add("TYPE_OPER,QUEUE,REZ_FIELD,PAYMENT_DETAILS FROM ");
ADOQuery4.SQL.Add("ibank2.operators,ibank2.opers2clients,ibank2.clients,ibank2.p ayment)");
ADOQuery4.SQL.Add("WHERE ibank2.clients.client_id=ibank2.opers2clients.client_id and ");
ADOQuery4.SQL.Add("ibank2.opers2clients.operator_id=ibank2.operators.operator_id and ");
ADOQuery4.SQL.Add("ibank2.clients.client_id=ibank2.payment.client_id and");
ADOQuery4.SQL.Add("ibank2.PAYMENT.status_doc=3 and");
ADOQuery4.SQL.Add("ibank2.clients.name_cln= :D ");
ADOQuery1.Parameters.FindParam("D").Value:=DBGrid2.SelectedField.Text;
ADOQuery4.SQL.Add("into dbo.megasoft1");

он мне пишет ошибку parameter object is improperly defined.Inconsistent or incomplete information was provided

← →
clickmaker © (2006-12-20 15:49) [1]

insert into dbo.megasoft1(Field1, ..., FieldN)
select Field1, ..., FieldN from ...

ADOQuery1.Parameters.ParseSQL(ADOQuery1.Text, True);
перед ADOQuery1.Parameters.FindParam

← →
Desdechado © (2006-12-20 16:48) [2]

> как нам тяжело новичкам
тяжело в учении, легко в бою ... если выживешь

читать-то научишься? а головой думать?

http://delphimaster.net/view/2-1166613362/
http://delphimaster.net/view/2-1166613362/

← →
регинка (2006-12-21 08:09) [3]

теперь я сделала так
ADOQuery4.SQL.Add("Insert into dbo.megasoft1(num_doc1,date_doc1,payment_type1,payer_inn1,");
ADOQuery4.SQL.Add("payer_name1,ibank2.payment.KPP1,AMOUNT1,PAYER_ACCOUNT1,PAYER_ BANK_NAME1,");
ADOQuery4.SQL.Add("PAYER_BANK_BIC1,PAYER_BANK_ACC1,RCPT_NAME1,RCPT_INN1,RCPT_BAN K_BIC1,");
ADOQuery4.SQL.Add("RCPT_BANK_ACC1,RCPT_KPP1,RCPT_ACCOUNT1,TYPE_OPER1,QUEUE1,REZ_ FIELD1,");
ADOQuery4.SQL.Add("PAYMENT_DETAILS1) select num_doc1,date_doc1,payment_type1,payer_inn1,payer_name1,");
ADOQuery4.SQL.Add("ibank2.payment.KPP1,AMOUNT1,PAYER_ACCOUNT1,PAYER_BANK_NAME1," );
ADOQuery4.SQL.Add("PAYER_BANK_BIC1,PAYER_BANK_ACC1,RCPT_NAME1,RCPT_INN1,");
ADOQuery4.SQL.Add("RCPT_BANK_BIC1,RCPT_BANK_ACC1,RCPT_KPP1,RCPT_ACCOUNT1,");
ADOQuery4.SQL.Add("TYPE_OPER1,QUEUE1,REZ_FIELD1,PAYMENT_DETAILS1 FROM ");
ADOQuery4.SQL.Add("ibank2.operators,ibank2.opers2clients,ibank2.clients,ibank2.p ayment ");
ADOQuery4.SQL.Add("WHERE ibank2.clients.client_id=ibank2.opers2clients.client_id and ");
ADOQuery4.SQL.Add("ibank2.opers2clients.operator_id=ibank2.operators.operator_id and ");
ADOQuery4.SQL.Add("ibank2.clients.client_id=ibank2.payment.client_id and");
ADOQuery4.SQL.Add("ibank2.PAYMENT.status_doc=3 and");
ADOQuery4.SQL.Add("ibank2.clients.name_cln= :D ");
ADOQuery4.SQL.Add("values (:D,:d2,:e,:f,:g,:h,:j,:k,:l,:m,:n,:d1,:e1,:f1,");
ADOQuery4.SQL.Add(":g1,:h1,:j1,:k1,:l1,:m1,:n1,:v)");
ADOQuery4.Parameters.FindParam("D").Value:=DBGrid2.SelectedField.Text;
ADOQuery4.Parameters.FindParam("d2").Value:=ADOQuery1.Fields[0].Value;
ADOQuery4.Parameters.FindParam("e").Value:=ADOQuery1.Fields[1].Value;
ADOQuery4.Parameters.FindParam("f").Value:=ADOQuery1.Fields[2].Value;
ADOQuery4.Parameters.FindParam("g").Value:=ADOQuery1.Fields[3].Value;
ADOQuery4.Parameters.FindParam("h").Value:=ADOQuery1.Fields[4].Value;
ADOQuery4.Parameters.FindParam("j").Value:=ADOQuery1.Fields[5].Value;
ADOQuery4.Parameters.FindParam("k").Value:=ADOQuery1.Fields[6].Value;
ADOQuery4.Parameters.FindParam("l").Value:=ADOQuery1.Fields[7].Value;
ADOQuery4.Parameters.FindParam("m").Value:=ADOQuery1.Fields[8].Value;
ADOQuery4.Parameters.FindParam("n").Value:=ADOQuery1.Fields[9].Value;
ADOQuery4.Parameters.FindParam("d1").Value:=ADOQuery1.Fields[10].Value;
ADOQuery4.Parameters.FindParam("e1").Value:=ADOQuery1.Fields[11].Value;
ADOQuery4.Parameters.FindParam("f1").Value:=ADOQuery1.Fields[12].Value;
ADOQuery4.Parameters.FindParam("g1").Value:=ADOQuery1.Fields[13].Value;
ADOQuery4.Parameters.FindParam("h1").Value:=ADOQuery1.Fields[14].Value;
ADOQuery4.Parameters.FindParam("j1").Value:=ADOQuery1.Fields[15].Value;
ADOQuery4.Parameters.FindParam("k1").Value:=ADOQuery1.Fields[16].Value;
ADOQuery4.Parameters.FindParam("l1").Value:=ADOQuery1.Fields[17].Value;
ADOQuery4.Parameters.FindParam("m1").Value:=ADOQuery1.Fields[18].Value;
ADOQuery4.Parameters.FindParam("n1").Value:=ADOQuery1.Fields[19].Value;
ADOQuery4.Parameters.FindParam("v").Value:=ADOQuery1.Fields[20].Value;
ADOQuery4.ExecSQL;

теперь такая ошибка incorrect syntax the keyword "values"

← →
Sergey13 © (2006-12-21 08:17) [4]

ИМХО или автор уже не операбелен или это развод.

← →
регинка (2006-12-21 08:21) [5]

короче как мне данные из запроса adoquery1, занести в таблицу БД megasoft1

← →
Sergey13 © (2006-12-21 08:33) [6]

> [5] регинка (21.12.06 08:21)

Тебе в трех ветках уже ответили по нескольку раз. Но ты хочешь не помощи, чтобы понять и разобраться, а халявы, что бы совсем думалку не включать. Последний совет - найми программиста.

← →
Virgo_Style © (2006-12-21 08:33) [7]

регинка (21.12.06 8:21) [5]
Уже, кажется, советовали запросом - вот им и занести

← →
pavel_guzhanov © (2006-12-21 09:07) [8]

INSERT INTO TableName (Имена полей......) VALUES (Вносимые значения.......) WHERE ....
У тебя же сначала идут имена полей, потом условие, а потом вносимые значения....

> pavel_guzhanov © (21.12.06 09:07) [8]
> Диковинный синтаксис. Сам придумал?

да уж... :0)) сам со стороны посмотрел и ужаснулся :0)) Извиняюсь, глупость запостил в

> pavel_guzhanov © (21.12.06 09:07) [8]

Ага, просмотрел еще раз [3], вроде понял... Ты вставляешь в таблицу данные, полученные селектом, а потом еще пытаешься вставить и values... IMHO так нельзя...

> регинка (21.12.2006 8:09:03) [3]

Ты когда будешь нормально офорлять заголовки тем?

как нам тяжело новичкам Найти похожие ветки