以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] 升级最新版后,使用目录树筛选出现混乱,3楼已上图! (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=33167) |
-- 作者:bahamute -- 发布时间:2013/5/14 23:37:00 -- [求助] 升级最新版后,使用目录树筛选出现混乱,3楼已上图! 升级到最新版,今天测试项目时发现目录树筛选出现混乱问题: 过程重现: 1、使用目录树筛选,双击某条记录,弹出明细窗口。 2、对弹出窗口不做任何操作,直接关闭。 3、再点击目录树其他节点筛选,问题出来了,会发现第1步查询结果的当前行也出现在当前查询结果中(穿越了),而且还是当前行,只要点击其他行,则穿越行自动消失。 换回2012版或2013测试版均无此问题,不知是何原因,目前只能先用测试版,待找到原因再升级吧。 [此贴子已经被作者于2013-5-15 9:40:44编辑过]
|
-- 作者:bahamute -- 发布时间:2013/5/15 9:39:00 -- 因包含部分真实数据,不便上传,昨晚反复测试到12点(试过两台电脑),做了简单截图: 1、如果从2013正式版版新建类似项目,未发现此现象(测试不详细,要构建同样的例子,不是短时间能做好)。 2、如果从2013正式版运行旧版本开发的项目,必有此情况(不是偶然)。 3、2012版及2013测试版运行项目完全正常。 运行截图: 1、用2013测试版运行项目截图(运行正常,2012版测试正常,图略): 2、用2013正式版运行项目截图(出现问题): 个人感觉是程序方面的问题,不是项目的问题。 |
-- 作者:Bin -- 发布时间:2013/5/15 9:47:00 -- 筛选树用的就是设置Filter的值吧, 我这测试了一下没发现这些现象啊. 你可以每次点击筛选的时候弹出一下值看看.是否正常.
|
-- 作者:bahamute -- 发布时间:2013/5/15 9:52:00 -- 以下是引用Bin在2013-5-15 9:47:00的发言: 筛选树用的就是设置Filter的值吧, 我这测试了一下没发现这些现象啊. 你可以每次点击筛选的时候弹出一下值看看.是否正常.
代码如下: Dim Value() As String Value = e.Node.FullPath.Split("\\") If Value(0)="按单位"
Then
Select Case e.Node.Level
Case 0
Tables("基本信息").Filter ="[身份标识_身份1] = \'改制 \'"
Case 1
Tables("基本信息").Filter ="[单位] = \'" &
Value(1) & "\' And [身份标识_身份1] = \'改制 \'" End Select End if |
-- 作者:Bin -- 发布时间:2013/5/15 9:56:00 -- messagebox.show(Tables("基本信息").Filter) 看看是否正常,如果正常,但是效果不是你预期的,那可能是程序有问题了.联系客服去.
|
-- 作者:bahamute -- 发布时间:2013/5/15 10:07:00 -- 看来只能联系客服了,实在找不到原因。 |
-- 作者:bahamute -- 发布时间:2013/5/15 10:33:00 -- 谢谢,正在联系。 |
-- 作者:狐狸爸爸 -- 发布时间:2013/5/15 10:51:00 -- 问题很奇怪,这么看看行不行:
Dim Value() As String Value = e.Node.FullPath.Split("\\") If Value(0)="按单位" Then Select Case e.Node.Level Case 0 Tables("基本信息").Filter ="[身份标识_身份1] = \'改制 \'" Case 1 Tables("基本信息").Filter ="[单位] = \'" & Value(1) & "\' And [身份标识_身份1] = \'改制 \'" End Select Tables("基本信息").Refresh() ables("基本信息").Positon = 0 End if [此贴子已经被作者于2013-5-15 10:50:50编辑过]
|
-- 作者:bahamute -- 发布时间:2013/5/15 10:56:00 -- 报错了: Positon不是table的成员
|