| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 不同用户处理不同的行出现的小问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=174350) |
| -- 作者：hfapplehao -- 发布时间：2022/1/12 8:27:00 -- 不同用户处理不同的行出现的小问题 新的一天，老师早上好呀！ 我的本来设想在按钮中写入加载表的代码。然后单击按钮的时候，就会根据使用者的名字，加载表以达到不同的用户处理不同的行的效果 可是实际运行起来，发现表中还会加载别的用户的数据。不知道问题出在哪儿了？ 代码如下 Dim s As String = "项目信息表" If DataTables.Contains(s) = False \'如果表S没有加载 DataTables(s).LoadFilter = "录入信息_录入者=\'" & user.name & "\'" \'设置加载条件 DataTables(s).Load() \'加载表C \'开启表事件 DataTables(s).GlobalHandler.DataRowAdding = True DataTables(s).GlobalHandler.PrepareEdit = True DataTables(s).GlobalHandler.DrawCell = True DataTables(s).GlobalHandler.DataColChanged =True DataTables(s).GlobalHandler.DoubleClick =True DataTables(s).GlobalHandler.Doubleclickrowheader = True \'开启表的doubleclickrowheader 属性 DataTables(s).DataCols("录入信息_录入者").AllowEdit = False DataTables(s).DataCols("录入信息_时间").AllowEdit = False End If MainTable = Tables(s) forms("加载树").show MainTable.Position = MainTable.Rows.Count -1
|
| -- 作者：有点蓝 -- 发布时间：2022/1/12 9:18:00 -- 代码放在哪里的？ |
| -- 作者：hfapplehao -- 发布时间：2022/1/12 10:54:00 -- 代码放在了菜单的按钮里面。 设想的点击按钮就可以打开表了 |
| -- 作者：有点蓝 -- 发布时间：2022/1/12 11:03:00 -- 1、如果用户不点击按钮，肯定还有其它用户的数据 2、用户点击系统菜单的刷新功能，加载树等可能会重新加载所有数据 3、检查还有什么代码设置更改了表格的加载条件 |