Delphi＋ADO＋SQLServer2000 程序容错处理？

Question

程序从网络接收数据，然后写入数据库中（需及时入库）。
现在如果SQLServer2000出现问题，则不能写入，
而且在数据库运行正常之后写入也会报错。
有什么高效正确的办法能判断程序与数据库的连接是否正常？

Answer 1

在插入数据执行后如果
Adoquery.sql.errorcount >0  说明语句执行失败，可以检测到触发器错误

Answer 2

78hgdong(蜗牛跑步)：能详细讲讲吗？
wdhans(wdhans)：语句执行失败返回的错误能区分出是什么原因吗？因为写数据库的时候也可能因为主键重复导致运行出错。
jslygwx(海豚)：详细讲讲？

Answer 3

用事务错作吧，即使出错了，也不回出现垃圾数据。
try
adoconnection.BeginTrans;
adoconnection.CommitTrans;
except
 adoconnection.RollbackTrans;
 showmessage('error');
end;