以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]网络作业中，删除行的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=30628)
--  作者：ericsky
--  发布时间：2013/4/1 11:00:00
--  [求助]网络作业中，删除行的问题
网络作业中，甲乙两人同时操作一行，当甲删除该行后，乙再保存该行，怎样才能弹出messagebox窗口，告诉乙该行已被删除了。
求高手给个代码，谢谢！
--  作者：Bin
--  发布时间：2013/4/1 11:03:00
--  
这个建议换个思路做个限制不能同时操作行。http://www.foxtable.com/help/topics/1993.htm
[此贴子已经被作者于2013-4-1 11:03:49编辑过]
--  作者：ericsky
--  发布时间：2013/4/1 13:20:00
--  
多谢楼上两位老师的回答！
我的想法是如果不想做独占式的编辑，也就是允许同时操作行，甲乙两人谁抢先谁操作，这种情况下有没有可以判断此行已被删除的代码？。
我用 rowstate.deleted的代码判断不出
--  作者：狐狸爸爸
--  发布时间：2013/4/1 14:45:00
--  

可以用这个办法，判断行是否已经删除：

 

Dim cmd As New SQLCommand
\'cmd.Connection Name = "数据源"
cmd.CommandText ="Select Count(*) From {表A} Where [_Identify] = " & Tables("表A").current("_Identify")
If cmd.ExecuteScalar  = 1 Then
    Messagebox.Show("哈,我还在!")
Else
    Messagebox.Show("唉,我被干掉了!")
End If
--  作者：ericsky
--  发布时间：2013/4/1 15:01:00
--  
太好了，谢谢狐爸！
有点怕sql这一章，每次看帮助都略过，看来要好好读读。