Foxtable(狐表)用户栏目专家坐堂 → [求助]数据加载条件


  共有18833人关注过本帖树形打印复制链接

主题:[求助]数据加载条件

帅哥哟,离线,有人找我吗?
易服
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
[求助]数据加载条件  发帖心情 Post By:2009/9/6 13:31:00 [只看该作者]


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

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

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

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

End If

 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/9/6 13:48:00 [只看该作者]

没完过,想了解~

 回到顶部
美女呀,离线,留言给我吧!
yangming
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/9/6 14:23:00 [只看该作者]

应该这样?没文件测试
If e.DataTableName = "总览" Then

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

End If

 回到顶部
帅哥哟,离线,有人找我吗?
易服
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By: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
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/9/6 18:56:00 [只看该作者]

我是9月2日的第二版,怎么还打不开你的文件?提示说你的版本太高,晕死了

 回到顶部
帅哥哟,离线,有人找我吗?
易服
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By:2009/9/6 19:35:00 [只看该作者]

我也是9月2日的第二版

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/9/7 8:36:00 [只看该作者]

表达式该用引号的地方不用,不该用的乱用,字符用单引号,数字不用!


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


 回到顶部
帅哥哟,离线,有人找我吗?
易服
  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By:2009/9/7 9:59:00 [只看该作者]

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

 回到顶部
美女呀,离线,留言给我吧!
yangming
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/9/7 10:10:00 [只看该作者]

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

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


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/9/7 10:16:00 [只看该作者]

呵呵,这个错误不关杨版主的事。
楼主自己才清楚数据类型的,杨版只能给一个思路。


 回到顶部
总数 22 1 2 3 下一页