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


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

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

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/9/7 8:36:00 [显示全部帖子]

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


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


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/9/7 10:16:00 [显示全部帖子]

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


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/9/7 12:00:00 [显示全部帖子]

If e.DataTableName = "总览" Then 
    If e.User.ExtendedValues("数据加载") > "" Then
         e.Filter = "[乡名] = '" & e.User.ExtendedValues("数据加载") & "'"
    End If
End If

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/9/7 16:37:00 [显示全部帖子]

报错是正常的,你这样的代码,对于非总揽表也只设置了条件,而这些表也不一定有乡名这一列的。

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/9/7 18:05:00 [显示全部帖子]

以下是引用易服在2009-9-7 17:42:00的发言:
      以上代码还有个缺限就是第一次登录窗口数据加载值出现空白(千万不能选)可以加载全部数据,一旦选中乡名(就不能出现空白)打开文件退出,再打开时登录窗口数据加载值出现乡名只能加载某个乡而不能出现空白可以加载全部数据。重新设置用户管理扩展属性(只要打开确定就可以什么也不要动)
      不能实现按需选择有点麻烦





代码是灵活的,你可以加一个名为"全部"候选值,然后修改代码

If e.DataTableName = "总览" Then 
    If e.User.ExtendedValues("数据加载") > ""  AndAlso e.User.ExtendedValues("数据加载") <> "全部" Then
         e.Filter = "[乡名] = '" & e.User.ExtendedValues("数据加载") & "'"
    End If
End If


 回到顶部