更新语句抛出异常

Question

我写此查询：

 Ado_All.Parameters.Clear; 
     Ado_All.SQL.Clear; 
     Ado_All.SQL.Add('update Tbl_Customer_Services set fk_Customer =:0, fk_Services =:1, Start_Date =:2, End_Date=:3'); 
     Ado_All.SQL.Add(' ,Hesab =:4, Domain_Name =:5,Comments =:7 where Customer_Services_Id =:6 ');  
     Ado_CmbNames.MoveBy(Cmb_Customer.ItemIndex); 
     Ado_All.Parameters[0].Value := Ado_CmbNames.FieldByName('Customer_Id').AsString; 
     Ado_All.Parameters[1].Value := '1'; 
     Ado_All.Parameters[2].Value := '10/10/2010'; 
     Ado_All.Parameters[3].Value := '10/10/2010'; 
     Ado_All.Parameters[4].Value :=Txt_Mali.Text; 
     Ado_All.Parameters[5].Value := Txt_Domin.Text; 
     Ado_All.Parameters[6].Value := ADOQuery2.FieldByName('Customer_Services_Id').AsString; 
     Ado_All.Parameters[7].Value := Txt_Domin.Text; 
     Ado_All.ExecSQL; 

Ado_All是AdoQuery。但它有以下错误：

任何想法？

Answer 1

我怀疑SQL语句中的冒号字符（:）导致了问题。尝试使用= ?作为SQL文本中参数值的占位符，例如

UPDATE Tbl_Customer_services SET fk_Customer = ?, fk_Services = ?, ... 

，并确保参数值添加到.Parameters集合中的确切使他们出现在SQL语句。