以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  老师您好,我想一下副本表筛选后  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=171082)

--  作者:xingshou
--  发布时间:2021/8/17 10:23:00
--  老师您好,我想一下副本表筛选后
老师您好,我想一下副本表筛选后上一条,下一条显示的都是全部表的内容,请问有什么方法让副本可以上一条,下一条都显示筛选的内容
--  作者:cd_tdh
--  发布时间:2021/8/17 11:08:00
--  

筛选、上一条、下一条代码贴出来看

 

[此贴子已经被作者于2021/8/17 11:08:49编辑过]

--  作者:xingshou
--  发布时间:2021/8/17 11:11:00
--  
上一条下一条类似 If DataTables("Table_3").HasChanges Then
    If MessageBox.Show("产品表已经被修改,是否保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
        DataTables("Table_3").Save()
    End If
End If
Tables("Table_3").position=Tables("Table_3").position - 1
筛选是Tables("主控窗口_Table1").filter = "处理人=\'" & user.name & "\'"

--  作者:xingshou
--  发布时间:2021/8/17 11:12:00
--  
筛选的是附表就是我想上一条下一条对副表也可以主表也可以
--  作者:cd_tdh
--  发布时间:2021/8/17 11:34:00
--  

上一条下一条应该用tables,不是DataTables

 


--  作者:cd_tdh
--  发布时间:2021/8/17 11:37:00
--  

With Tables("Table_3")
    If .Current IsNot Nothing AndAlso .Current.DataRow.RowState = DataRowState.Unchanged Then  \'如果当前行未曾修改
        .Position = .Position - 1

    Else

       MessageBox.Show("产品表已经被修改,是否保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then

       .Current.save
    End If
End With


--  作者:xingshou
--  发布时间:2021/8/17 11:38:00
--  
DataTables是保存啊,我上一页下一页都是用tables啊
--  作者:xingshou
--  发布时间:2021/8/17 11:44:00
--  
老师我想咨询的是副本筛选后上一页跟下一页显示的不是筛选的数据,而是全部表的数据,我就想副本筛选后,录入的上一页跟下一页跟晒选的对应,因为主表的筛选完后,录入窗口是显示得到上一页跟下一页是对应的筛选内容,我只是想解决这个问题
[此贴子已经被作者于2021/8/17 11:44:47编辑过]

--  作者:有点蓝
--  发布时间:2021/8/17 11:46:00
--  
只能针对一个表

主表
Tables("Table_3").position=Tables("Table_3").position - 1

副本
Tables("主控窗口_Table1").position=Tables("主控窗口_Table1").position - 1

--  作者:xingshou
--  发布时间:2021/8/17 11:50:00
--  
那老师可不可以判断就是我 doubleclik是打开录入的窗口嘛,就是我上一页那里判断如果是副本表双击就执行Tables("主控窗口_Table1").position=Tables("主控窗口_Table1").position - 1,如果是主表就执行Tables("Table_3").position=Tables("Table_3").position - 1