以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于openqq的多人同时操作  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77552)

--  作者:tcmhl
--  发布时间:2015/11/20 11:50:00
--  关于openqq的多人同时操作
看了帮助里的即时同步,如果是窗口编辑的话,比如A编辑第8行,此时B把第5行删除了,A的焦点仍然是第8行但内容会变成原来第9行的内容,请问一下有没有简单的思路解决这个问题=。=

--  作者:大红袍
--  发布时间:2015/11/20 13:16:00
--  

 记录一下主键位置

 

Dim temp As String = Tables("表A").Current("_Identify")

\'任意的其他操作

\'最后执行
Dim idx As Integer = Tables("表A").FindRow("_Identify = " & temp)
If idx >= 0 Then
    Tables("表A").Position = idx
End If