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


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

主题:自动删除行

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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57640 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/1/12 7:37:00 [显示全部帖子]

Datatables("表B").Deletefor("列名='" & 表A相对应的条件 & "'")

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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57640 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/1/13 13:09:00 [显示全部帖子]

Datatables("表B").Deletefor("ID='" & e.Dtrow( "_Identify")& "'")  这样试试.或者老大改这样试试:

 

Dim dr As DataRow = DataTables("表B").Find("ID = " & e.DataRow("_Identify"))
If dr IsNot Nothing Then
    dr.Delete
End If
Dm dr1 As Datarow=Datatables("表C").Find("ID = " & e.DataRow("_Identify"))
If dr1IsNot Nothing Then
    dr1.Delete
End If


 回到顶部