Foxtable(狐表)用户栏目专家坐堂 → 删除行


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

主题:删除行

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


加好友 发短信
等级:五尾狐 帖子:1068 积分:7624 威望:0 精华:0 注册:2009/6/24 9:44:00
删除行  发帖心情 Post By:2023/5/17 14:35:00 [只看该作者]

 Dim drs As List(Of DataRow) = DataTables("事项进度").SQLSelect("主键编号= '" & dr("_Identify") & "'")
    For Each dr2 As DataRow In drs
        If Names2.Contains(dr2("录入人员")) = False Then '将现有行中需要删除的删除掉
            dr2.delete()
            dr2.Remove()
            dr2.Save()
        Else
            Names.Add(dr2("录入人员"))
        End If
    Next

 

上面代码dr2.delete() 这个对不对?貌似没起作用


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111406 积分:567100 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/17 14:45:00 [只看该作者]

如果要删除符合条件的数据,一句就行了

DataTables("事项进度").SQLdeletefor("主键编号= '" & dr("_Identify") & "' and 录入人员 not in ('" & string.join("','",Names2.toarray) & "')")

 回到顶部