PB_删除实现方法

来源:互联网 发布:windows 官网 编辑:程序博客网 时间:2024/06/04 19:02

删除方法的一个小分享,当然实现这个功能的方法很多,如果大家那有更优化的方法,请指教!谢谢!

话不多说,代码走起:

//判断如果数据行数为0,则直接给出提示信息if dw_userinfo_detail.rowcount() = 0 thenMessageBox('提示','没有可删除数据')returnelseString ls_namels_name = dw_userinfo_detail.Object.username[1]if MessageBox('提示','是否要删除学生'+ls_name+'的信息吗?',Exclamation!,YesNo!) = 1 thendw_userinfo_detail.deleterow(1)elsereturnend ifif dw_userinfo_detail.update() = 1 thencommit;elseMessageBox('提示','删除失败!')rollback;end ifend ifdw_userinfo_list.retrieve('%')


0 0
原创粉丝点击