以文本方式查看主题

-  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=4238)

--  作者:易服
--  发布时间:2009/9/6 13:31:00
--  [求助]数据加载条件

图片点击可在新窗口打开查看此主题相关图片如下:加载.gif
图片点击可在新窗口打开查看

登录时选择其中一个乡加载数据

求: BeforeLoadInnerTable事件
 
If e.DataTableName = "总览" Then

e.Filter = "[乡名] = 代码? "

End If
--  作者:mr725
--  发布时间:2009/9/6 13:48:00
--  
没完过,想了解~
--  作者:yangming
--  发布时间:2009/9/6 14:23:00
--  
应该这样?没文件测试
If e.DataTableName = "总览" Then

e.Filter = "[乡名] = " & e.User.ExtendedValues("数据加载")

End If

--  作者:易服
--  发布时间:2009/9/6 17:51:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:2009-9-6 17-44-29.png
图片点击可在新窗口打开查看
      项目文件再也打不开了(长按CTRL也不行)因为启动速度慢才想起加载部分数据,表中的数据不算多还不到4万行,是不是
表达式列太多(数据列55,表达式列65)的原因。有的数据要通过表达式取得,有不有更好的办法不用表达式彧少用表达式?
     另外发现PositionChanged:  StatusBar.Message1 = "第" & (e.Table.Position + 1) & "行,共" & e.Table.Rows.Count & "行"   红色部分不生效,不论光标在哪一行始终显示第一行。以前版本生效,不知从哪个版本起无效,换以前版本提示版本太高
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:退耕还林管理系统.rar
(我打不开的)
PASS:1E40F
[此贴子已经被作者于2009-9-6 18:40:28编辑过]

--  作者:yangming
--  发布时间:2009/9/6 18:56:00
--  
我是9月2日的第二版,怎么还打不开你的文件?提示说你的版本太高,晕死了
--  作者:易服
--  发布时间:2009/9/6 19:35:00
--  
我也是9月2日的第二版
--  作者:狐狸爸爸
--  发布时间:2009/9/7 8:36:00
--  
表达式该用引号的地方不用,不该用的乱用,字符用单引号,数字不用!


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:退耕还林管理系统.rar


--  作者:易服
--  发布时间:2009/9/7 9:59:00
--  
贺老师改的 If e.DataTableName = "总览" Then e.Filter = "[乡名] = \'" & e.User.ExtendedValues("数据加载") & "\'" End If
[此贴子已经被作者于2009-9-7 11:18:58编辑过]

--  作者:yangming
--  发布时间:2009/9/7 10:10:00
--  
以下是引用易服在2009-9-7 9:59:00的发言:
贺老师改的 If e.DataTableName = "总览" Then e.Filter = "[乡名] = \'" & e.User.ExtendedValues("数据加载") & "\'" End If

收到,我知道错在何处了,呵呵


--  作者:狐狸爸爸
--  发布时间:2009/9/7 10:16:00
--  
呵呵,这个错误不关杨版主的事。
楼主自己才清楚数据类型的,杨版只能给一个思路。