以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]对表筛选后，如何对数据表操作？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=136827)
--  作者：huahuads
--  发布时间：2019/6/22 12:49:00
--  [求助]对表筛选后，如何对数据表操作？
窗口中有个table1，在窗口的 Afterload 事件中，对　Table1　设置了　filter　对“订单状态”进行“待完成”选择过滤，
这样table1 中只能看到“待完成”的订单。如果完成后，状态调整为“已完成”，就从列表中消失了。
现打算增加“回撤”功能，回撤后，修改回“待完成。
实现思路很简单，在table1 绑定的表中找对应订单编号，修改其状态即可。
于是做了这个代码：

e.form.Controls("Table1").Select

With CurrentTable
    Dim rr As Integer
    rr = .Find(ddbh,.RowSel + 1,"订单编号", True, True, True)

但是这个find　就找不到这个订单编号，其实应该只是筛选过滤了。应该是table　和　datatalbe　的问题？（貌似是控件TABLE和表TABLE，还有DATATABLE没理解好)
新手别笑，老鸟解惑！谢
--  作者：有点蓝
--  发布时间：2019/6/22 13:31:00
--  
dim dr as datarow = e.form.Controls("Table1").table.datatable.find("订单编号=\'" & ddbh & "\'")
if dr isnot nothing then
    dr("订单状态") = "待完成"
end if
--  作者：huahuads
--  发布时间：2019/6/22 16:51:00
--  
谢谢！