高分，问题解决立即给分!!!!! 急急!!!!!!!!!!!!!

Question

用事务：
  ADOConnection1.BeginTrans;
  try
    with adoquery1 do
append;
dbimage1.Picture.LoadFromFile(Openpicturedialog1.FileName);
post;  //执行到 1
end;with adoquery2 do
append;
fieldbyname('image').value:=adoquery1.fieldbyname('image').value;
post;  //执行到2
end;    ADOConnection1.CommitTrans;
  except
    ADOConnection1.RollbackTrans;
  end;

Answer 1

我目前是通过ado　访问数据库。　但这个ado,　在网络不通的情况下。经常死机，　数据传输到中途，就报你网络忙，　这样数据的结构就不正确。以前从来没有用过事务，　我该怎样写呢？　用什么语句。　以前看过一点点。　
谢谢各位指导!

Answer 2

ADOConnection.启动事务
try
  with adoquery1 do
    append;
    dbimage1.Picture.LoadFromFile(Openpicturedialog1.FileName);
    post;  //执行到 1
  end;  with adoquery2 do
    append;
    fieldbyname('image').value:=adoquery1.fieldbyname('image').value;
    post;  //执行到2
  end;
  ADOConnection.提交事务;
except
  ADOConnection.回滚事务;
end;