一个关于Paradox数据库的问题(20分)

  • 主题发起人 主题发起人 wzx4931
  • 开始时间 开始时间
W

wzx4931

Unregistered / Unconfirmed
GUEST, unregistred user!
History0是一个用Paradox建的表

Querytable.Close;
Querytable.SQL.Clear;
sql:='insert into History0 (Datestamp,Timestamp,Test Number,VIN,ZTS Code)'
+'values(:Edtdatestamp,:Edttimestamp,:edtnumber,:edtvin,:edtZtscode)';
Querytable.SQL.Add(sql);
Querytable.Parameters.ParamByName('Edtdatestamp').Value :=Edt_Datestamp.Text;
Querytable.Parameters.ParamByName('Edttimestamp').Value :=Edt_Timestamp.Text;
Querytable.Parameters.ParamByName('edtnumber').Value :=Edt_TestNumber.Text;
Querytable.Parameters.ParamByName('edtvin').Value :=Edt_VIN.Text;
Querytable.Parameters.ParamByName('edtZtscode').Value :=Edt_ZTSCode.Text;
Querytable.ExecSQL;

运行后为什么提示insert into 语句的语法错误。我用的是ADO连接数据源。
 
你测试看看这样的顺序?
Querytable.Close;
Querytable.SQL.Clear;
sql:='insert into History0 (Datestamp,Timestamp,Test Number,VIN,ZTS Code)'
+'values(:Edtdatestamp,:Edttimestamp,:edtnumber,:edtvin,:edtZtscode)';
Querytable.Parameters.ParamByName('Edtdatestamp').Value :=Edt_Datestamp.Text;
Querytable.Parameters.ParamByName('Edttimestamp').Value :=Edt_Timestamp.Text;
Querytable.Parameters.ParamByName('edtnumber').Value :=Edt_TestNumber.Text;
Querytable.Parameters.ParamByName('edtvin').Value :=Edt_VIN.Text;
Querytable.Parameters.ParamByName('edtZtscode').Value :=Edt_ZTSCode.Text;
Querytable.SQL.Add(sql);
Querytable.ExecSQL;
 
在给参数赋值前加上
Querytable.Parameters.refresh
 
还是不行呀!
 
多人接受答案了。
 
后退
顶部