为什么我的没有问题。你看是不是把ADOQuery1还ADOConnectiong正确的连接了?还有,这两个表之间有没有外键约束

解决方案 »

  1.   

    问题解决?
    我要回复 | 我感兴趣 | 打印贴子 | 推荐给朋友 | 关闭窗口  
    主  题:ADO 出错了!  看了!
    作  者:liming_zh
    所属论坛:Delphi
    问题点数:39
    回复次数:4
    发表时间:2001-4-6 18:15:00
     
    我用 ADO 连接 SQL SERVER 7,利用ADOConnection 事务执行实现下面的功能:
    同时在几个表中插入数据, 1、
    当把“表1”放在首部时,执行后,表1无插入记录,表2插入成功。
    反之,表2无插入记录,表1插入成功。
    2,
    事务取掉,无论怎样执行成功。
    3,
    每个表刚插入,执行插入后,查看所插入的记录--存在。看下面代码
    begin
    ADOConnection1.BeginTrans;
    with ADOQuery1 do
    begin// 表1  Close;
      sql.clear;
      sql.add('insert into jinhuo_pz_sj (jinh_no,          kehu_no,cangk_dm,jinh_rq )'+ 
        'values (''donot know'', ''123'', ''123'', ''2001-03-05'') ');
      execsql;  表2
      close;
      sql.clear;
      sql.add('insert into jinhuo_mx_sj (jinh_no, peij_no) 
              Values(''donot know'',''123'') ' );
      ExecSQL;end;
    adoconnection1.CommitTrans