以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  删除不需要的产品  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=192147)
--  作者：sanny
--  发布时间：2024/5/31 10:02:00
--  删除不需要的产品
你好，请问如何将表1中的产品不在表2中的，点按钮后删除，谢谢。



图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2024/5/31 10:12:00
--  
DataTables("表1").SQLDeleteFor("产品 not in (select 产品 from {表2})") 前提是两个表都在同一个数据源
--  作者：listfor
--  发布时间：2024/5/31 10:14:00
--  
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim dvTable2 As New DataView(dt2) \' 假设dt2是第二个DataTable dvTable2.Sort = "YourKeyField" \' 根据关键字段排序 For i As Integer = dt1.Rows.Count - 1 To 0 Step -1 \' 从最后一个行开始遍历 If dvTable2.Find(dt1.Rows(i)("YourKeyField")) = -1 Then dt1.Rows(i).Delete() \' 如果行不在dt2中，则删除它 End If Next dt1.AcceptChanges() \' 提交更改 End Sub
--  作者：sanny
--  发布时间：2024/5/31 10:25:00
--  

现都在foxtbale一个项目中，那如果都在后台sql中，如何修改 ？

DataTables("表1").SQLDeleteFor("产品 not in (select 产品 from {表2})") 前提是两个表都在同一个数据源
--  作者：有点蓝
--  发布时间：2024/5/31 10:25:00
--  
不需要修改，一样的用法