如何验证用SQL语句在PB中执行成功!
例如,insert into settings(管理员密码长度,碟片编号长度,会员编号长度,管理员编号长度)
values(:em_1.text,:em_2.text,:em_3.text,:em_4.text);
update settings
set 管理员密码长度=:em_1.text,碟片编号长度=:em_2.text,
会员编号长度=:em_3.text,管理员编号长度=:em_4.text;
执行此语句有个时间过程,如何验证成功执行SQL语句,谢谢!
问题点数:80、回复次数:7Top
1 楼dreamnow(梦想&现实)回复于 2006-03-20 19:34:46 得分 20
if sqlca.sqlcode<>0 then
messagebox("错误",sqlca.sqlerrtext)
end if
Top
2 楼li_d_s(鄙视那些不懂Java却跑来乱骂的人,.NET没啥了不起)回复于 2006-03-21 09:56:57 得分 20
update 之后加上
if sqlca.sqlcode<>0 then
messagebox("错误",sqlca.sqlerrtext)
end ifTop
3 楼netspies(从头再来)回复于 2006-03-21 10:15:20 得分 20
if sqlca.sqlcode = 0 then
commit;
messagebox("OK",'OK')
else
rollback;
messagebox("错误",sqlca.sqlerrtext)
end if
Top
4 楼DYFDWX(旺仔)回复于 2006-03-21 10:49:44 得分 10
if sqlca.sqlcode = 0 then
commit;
messagebox("OK",'OK')
else
rollback;
messagebox("错误",sqlca.sqlerrtext)
end if
Top
5 楼sdhylj(青锋-SS)(献血有益健康(别人的))回复于 2006-03-21 14:43:28 得分 10
if sqlca.sqlcode = 0 then
commit;
messagebox("OK",'OK')
else
messagebox("错误",sqlca.sqlerrtext) //这两句不能颠倒!
rollback;
end ifTop
6 楼hygougou(uoguogyh)回复于 2006-03-21 15:40:39 得分 0
返回类:SQLcode,SQLNRows,SQLDBcode,SQLErrText.Top
7 楼cokimit(星星)回复于 2006-03-21 19:27:01 得分 0
谢谢各位!敬礼Top




