以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]删除多行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72498)
--  作者：ZDG
--  发布时间：2015/7/30 22:16:00
--  [求助]删除多行

dr = DataTables("台账").Find("[单号] = \'" & e.Form.Controls("TextBox1").text & "\'")
dr.delete

 请问，上面代码是删除一行的代码，如果要删除多行该怎么写
--  作者：blsu33
--  发布时间：2015/7/30 22:24:00
--  
dim drs as list (of datarow)
drs = DataTables("台账").select("[单号] = \'" & e.Form.Controls("TextBox1").text & "\'")
if drs IsNot Nothing then
for each dr as datarow in drs
dr.delete
next
end if
[此贴子已经被作者于2015/7/30 22:26:20编辑过]
--  作者：大红袍
--  发布时间：2015/7/31 2:03:00
--  

http://www.foxtable.com/help/topics/0394.htm