用的什么库?
试试va:='insert into tj(资产编号,数量) as ';
另外注意into 和空格
试试va:='insert into tj(资产编号,数量) as ';
另外注意into 和空格
解决方案 »
- DELPHI7 用idsmtp 做一个简单邮件发送出问题了, 求解
- bitbtn和image显示
- Delphi 怎样禁止XP关机
- 有关delphi和autocad二次开发的问题?
- Access中创建视图时:Views 内只允许出现简单的SELECT 查询 ????
- ADOTable的行数汇总出错?
- 请问DELPHI程序员认证有用吗?
- 窗口左上角的程序图标点击时,“系统菜单”是如何弹出来的???
- HubDog的葵花宝典2.7已有了 ?
- 哥哥姐姐们,那里有delphi下载,别告诉borland有
- oracle 中的sqlca和sqlcode是什么?在sql语句中怎么取得sqlca.sqlcode的值?
- delphi中加入adoconnection控件后,看到不SQL服务器!
var
va:string;
begin
dbgrid1.datasource:=datasource2;
va:='insert tj(资产编号,数量)'
+' select lk.资产编号,lk.数量-bs.数量 from lk,bs';
+' where lk.资产编号=bs.资产编号';
query1.close;
query1.sql.clear;
query1.sql.add(va);
query1.EXECSQL;
end;
SQL语句正确。
var
va:string;
begin
dbgrid1.datasource:=datasource2;
va:='insert into tj(资产编号,数量)'
+' select lk.资产编号,lk.数量-bs.数量 from lk,bs';
+' where lk.资产编号=bs.资产编号';
query1.close;
query1.sql.clear;
query1.sql.add(va);
query1.EXECSQL;
end;
insert into 表名(字段1,字段2) Values(值1,值2)Insert语句是不需要返回结果集的,要用Query.Execsql来执行SQL语句。
应是 INSERT INTO