Foxtable(狐表)用户栏目专家坐堂 → 求助 窗口保存问题


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

主题:求助 窗口保存问题

帅哥哟,离线,有人找我吗?
jackyfashion
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:655 积分:5085 威望:0 精华:0 注册:2013/10/7 22:27:00
求助 窗口保存问题  发帖心情 Post By:2017/6/18 22:15:00 [只看该作者]

老师:
您好!
我打开窗口在Col 输入文字,退出窗口,提示是否保存,  单击否,但是还是保存
If DataTables("wawwxmum").HasChanges Then
    If MessageBox.Show("内容已更改,是否保存?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then
       DataTables("wawwxmum").Save
    End If
End If
e.Form.Close
请老师指教!!!
谢谢!!!

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/18 23:02:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
jackyfashion
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:655 积分:5085 威望:0 精华:0 注册:2013/10/7 22:27:00
  发帖心情 Post By:2017/6/19 0:16:00 [只看该作者]

老师:
您好!
主要是退出窗口时,不保存当前行,sql 是没有保存,
但是打开窗口时,还是上次输入的数据,并不是原先的数据
没有输入任何数据,退出窗口时,照样有上次关闭窗口的提示
用什么代码可以取消保存当前行输入的数据?
什么代码可以加载sql当前表最后一行的数据?
If DataTables("表A").HasChanges Then
    Dim Result As DialogResult
    Result = MessageBox.Show("内容已更改,是否保存?","提示", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
    If Result = DialogResult.No Then
                e.Form.Close
    ElseIf result = DialogResult.Cancel Then
        e.cancel = True
    ElseIf result = DialogResult.Yes Then
        DataTables("表A").save
        e.Form.Close
    End If
End If
请老师指点!!!
谢谢!!!
[此贴子已经被作者于2017/6/19 0:46:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/19 9:14:00 [只看该作者]

If DataTables("表A").HasChanges Then
    Dim Result As DialogResult
    Result = MessageBox.Show("内容已更改,是否保存?","提示", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
    If Result = DialogResult.No Then
        DataTables("表A").RejectChanges
        e.Form.Close
    ElseIf result = DialogResult.Cancel Then
        e.cancel = True
    ElseIf result = DialogResult.Yes Then
        DataTables("表A").save
        e.Form.Close
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
jackyfashion
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:655 积分:5085 威望:0 精华:0 注册:2013/10/7 22:27:00
  发帖心情 Post By:2017/6/19 19:47:00 [只看该作者]

谢谢老师!!!

 回到顶部