Foxtable(狐表)用户栏目专家坐堂 → [求助]OpenQQ实现独占式编辑


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

主题:[求助]OpenQQ实现独占式编辑

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


加好友 发短信
等级:小狐 帖子:350 积分:2927 威望:0 精华:0 注册:2015/4/23 19:53:00
[求助]OpenQQ实现独占式编辑  发帖心情 Post By:2016/2/23 12:33:00 [只看该作者]

3、在客户端的对应表的BeforeSaveDataRow事件中编写代码:

If e.DataRow.RowState=DataRowState.Modified  Then
    Dim Key As String = e.DataTable.Name & ":" & e.DataRow("_Identify")
    If tbrk.Contains(Key) Then
        tbrk.Remove(Key) '移除本地编辑登记
        QQClient.Send("!#" & Key & "#!") '通知服务器此行已经结束 编辑
    End If
End If

 

 


图片点击可在新窗口打开查看此主题相关图片如下:11.jpg
图片点击可在新窗口打开查看

 

代码出现错误

[此贴子已经被作者于2016/2/23 12:33:13编辑过]

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/2/23 12:34:00 [只看该作者]

Key变量重复定义

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


加好友 发短信
等级:小狐 帖子:350 积分:2927 威望:0 精华:0 注册:2015/4/23 19:53:00
  发帖心情 Post By:2016/2/23 13:03:00 [只看该作者]

这个问题解决了

但是又来了一个新问题

在窗口编辑时  

张三在编辑第5行   当张三保存关闭窗口或撤消关闭窗口后  

李四还是无法编辑此行  还是显示张三在编辑

 

 

 


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


加好友 发短信
等级:小狐 帖子:350 积分:2927 威望:0 精华:0 注册:2015/4/23 19:53:00
  发帖心情 Post By:2016/2/23 13:45:00 [只看该作者]

这个问题解决了

但是又来了一个新问题

在窗口编辑时  

张三在编辑第5行   当张三保存关闭窗口或撤消关闭窗口后  

李四还是无法编辑此行  还是显示张三在编辑

 


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/23 14:30:00 [只看该作者]

撤销或者关闭窗口的时候,你就撤销一下。

 

Dim r As Row = Tables("表B").Current
If r.DataRow.RowState = DataRowState.Modified  Then
    Dim Key As String = "表B:" & r("_Identify")
    If tbrk.Contains(Key) Then
        tbrk.Remove(Key) '移除本地编辑登记
        QQClient.Send("!#" & Key & "#!") '通知服务器此行已经结束 编辑
    End If
End If


 回到顶部