这样应该如何写才正确呀??
FJB 表结构
ID(自动编号) TYPE
1 AAA
2 BBB
3 CCC
ZK 表结构
ID(自动编号) TYPEID(就是FJB的ID字段) NAME
1 1 产品1
2 2 产品2
3 3 产品3
...
但我下面代码运行时候说什么表达式不匹配,如何写才正确呢?
==================================================
DataModule2.ADOQuery1.Close;
DataModule2.ADOQuery1.SQL.Clear;
DataModule2.ADOQuery1.SQL.add(SELECT * FROM FJB A,ZK B WHERE A.ID=ZK.FJID AND A.ID='+TMPFJBH); //按ID查询
DataModule2.ADOQuery1.open;
DataModule2.ADOQuery1.Edit;
DataModule2.ADOQuery1.FieldByName('TYPE').AsString:=Edit1.text;
DataModule2.ADOQuery1.FieldByName('NAME').AsString:=Edit2.text;
DataModule2.ADOQuery1.Post;
ShowMessage('修改成功!');
================================
[解决办法]
DataModule2.ADOQuery1.SQL.add(SELECT * FROM FJB A,ZK B WHERE A.ID=ZK.FJID AND A.ID='+TMPFJBH); //按ID查询
//ZK表哪里有FJID字段,不是TYPEID吗?
[解决办法]
DataModule2.ADOQuery1.Close;
DataModule2.ADOQuery1.SQL.Clear;
DataModule2.ADOQuery1.SQL.add(SELECT * FROM FJB A,ZK B WHERE A.ID=ZK.FJID AND A.ID='+TMPFJBH); //按ID查询
DataModule2.ADOQuery1.open;
DataModule2.ADOQuery1.Edit;
DataModule2.ADOQuery1.FieldByName('TYPE').AsInteger:=strtoint(trim(Edit1.text));
DataModule2.ADOQuery1.FieldByName('NAME').AsString:=Edit2.text;
DataModule2.ADOQuery1.Post;
ShowMessage('修改成功!');