我用PB9.0做个小软件，遇到点麻烦，报错syntax error
答案:2 悬赏:0 手机版
解决时间 2021-01-23 03:31
- 提问者网友：美人性情
- 2021-01-22 05:13
我用PB9.0做个小软件，遇到点麻烦，报错syntax error
最佳答案
- 五星知识达人网友：duile
- 2021-01-22 06:21
呵呵，为实现个保存提醒，有必要搞那么复杂吗！看你也是个新手，注意代码可整洁可读性，别说让人家看你的代码，就算过了段时间你自己再看看，也是一头雾水，良好的代码书写习惯很重要追问肯定是新手咯 唉。
大哥 这个咋个解决呢追答integer li_flag
if dw_1.ModifiedCount() + dw_1.DeletedCount() > 0 then
li_flag = MessageBox('提示','数据已经修改，是否保存?',Question!,YesNoCancel!,1)
choose case li_flag
case 1 //保存
if dw_1.Update() = 1 then
commit;
return 0
else
if MessageBox('提示','数据错误，不能保存。是否继续关闭？',Question!,YesNo!,2) = 1 then
return 0
else
rollback;
return 1
end if
end if
case 2 //不保存
rollback;
return 0
case 3 //取消
return 1
end choose
else
return 0
end if //看看是不是少了这个
大哥 这个咋个解决呢追答integer li_flag
if dw_1.ModifiedCount() + dw_1.DeletedCount() > 0 then
li_flag = MessageBox('提示','数据已经修改，是否保存?',Question!,YesNoCancel!,1)
choose case li_flag
case 1 //保存
if dw_1.Update() = 1 then
commit;
return 0
else
if MessageBox('提示','数据错误，不能保存。是否继续关闭？',Question!,YesNo!,2) = 1 then
return 0
else
rollback;
return 1
end if
end if
case 2 //不保存
rollback;
return 0
case 3 //取消
return 1
end choose
else
return 0
end if //看看是不是少了这个
全部回答
- 1楼网友：深街酒徒
- 2021-01-22 07:03
0.0.010230
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯