Foxtable(狐表) → 用户栏目 → 专家坐堂 → 保存数据


  共有2747人关注过本帖树形打印复制链接

主题：保存数据
美女呀，离线，留言给我吧！
xiaohuli
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：461 积分：3442 威望：0 精华：0 注册：2014/2/8 11:13:00 		保存数据  发帖心情 Post By：2014/4/10 16:40:00 [只看该作者]

 想实现在编辑窗口里，如果数据有修改，关闭之前提示要保存，保存后才可以关闭窗口，如果数据未修改，则可以直接关闭
这个怎么实现
我再BeforeClose写了代码如下：
If Tables("gdzc").Current.DataRow.RowState <> DataRowState.unchanged Then '如果当前行已经修改过
Dim Result As DialogResult
Result = MessageBox.Show("请先保存记录", "提示")
e.Cancel = True
End If
可是这个代码不对，就算是没有修改数据，他也会提示“请先保存记录”，这个怎么改呀
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2014/4/10 16:41:00 [只看该作者]

用HasChanges 判断 

If DataTables("X").HasChanges Then
 回到顶部
美女呀，离线，留言给我吧！
xiaohuli
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：461 积分：3442 威望：0 精华：0 注册：2014/2/8 11:13:00 		  发帖心情 Post By：2014/4/10 16:50:00 [只看该作者]

我按你说的做了，就算没有修改数据，他也提示得要保存，没修改就应该直接关闭，修改了才应该出现提示呀。

 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2014/4/10 16:52:00 [只看该作者]

按道理不会的,请上例子.
[此贴子已经被作者于2014-4-10 16:53:19编辑过]
 回到顶部
美女呀，离线，留言给我吧！
xiaohuli
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：461 积分：3442 威望：0 精华：0 注册：2014/2/8 11:13:00 		  发帖心情 Post By：2014/4/10 16:55:00 [只看该作者]

在编辑窗口的文本框里随便点击几下，没改变数据，他也提示要保存记录，要是一打开编辑窗口就直接关闭的话倒是不提示保存。

 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2014/4/10 16:57:00 [只看该作者]

是不是你设置了代码改变了值,或者值有空白,双击自动去掉了空白所以导致改变了值.

具体还请上个例子才好判断哦.
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 4 次数据查询