with DataM_1 do Begin AdoQuery2.Close; AdoQuery2.SQL.Clear; Sql_Str:='update Client_Tb set Client_name=:Name,LineMan=:Lm,Telphone=:Tel,Constract_No=:CN'; Adoquery2.SQL.Add(Sql_Str); AdoQuery2.Parameters[0].Value:=Cna_Edit.text; AdoQuery2.Parameters[1].Value:=Lm_edit.text; Adoquery2.Parameters[2].value:=Tel_edit.Text; Adoquery2.Parameters[3].value:=Addr_edit.Text; AdoQuery2.Parameters[4].Value:=cno_Edit.Text; Adoquery2.ExecSQL; end;
Sql_Str:='update Client_Tb set Client_name=:Name,LineMan=:Lm,Telphone=:Tel,Constract_No=:CN'; 只有四个参数啊! Adoquery2.Parameters[n].n从0-3,那里来的4?
http://expert.csdn.net/Expert/topic/2209/2209887.xml?temp=.9492761
我觉得这是些最最基本的东东,所以我希望楼主能多看点书,
Begin
AdoQuery2.Close;
AdoQuery2.SQL.Clear;
Sql_Str:='update Client_Tb set Client_name=:Name,LineMan=:Lm,Telphone=:Tel,Constract_No=:CN';
Adoquery2.SQL.Add(Sql_Str);
AdoQuery2.Parameters[0].Value:=Cna_Edit.text;
AdoQuery2.Parameters[1].Value:=Lm_edit.text;
Adoquery2.Parameters[2].value:=Tel_edit.Text;
Adoquery2.Parameters[3].value:=Addr_edit.Text;
AdoQuery2.Parameters[4].Value:=cno_Edit.Text;
Adoquery2.ExecSQL;
end;
只有四个参数啊!
Adoquery2.Parameters[n].n从0-3,那里来的4?