Foxtable(狐表)用户栏目专家坐堂 → 显示行问题


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

主题:显示行问题

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


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
显示行问题  发帖心情 Post By:2019/4/12 19:06:00 [只看该作者]

老师,请问下,打开表A时,显示的行永远不会超过当天电脑日期3天,比如电脑的日期是2019年4月12日,那么我要打开表

A时显示的行只会截止到2019年4月15日为止,日期列在2019年4月15日之后的行都不会显示,,表A里面有个日期列,这样

的代码要怎么写,谢谢!

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/12 20:21:00 [只看该作者]


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


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2019/4/12 20:46:00 [只看该作者]

老师,参考的我看了,不会弄,我需要的是代码的,是打开项目是就自动打开设定好的行,就是每次打开项目时,表A显示的行都会时电脑系统时间的后三天,下面是的代码试了下也不行,麻烦老师帮我写下,谢谢!
DataTables("表A").LoadFilter = "日期>= '"  &  Date.Today.AddToday(+3) & "'"
DataTables("表A").Load

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


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2019/4/12 20:49:00 [只看该作者]

每次打开项目时,表A显示的行都会从之前所有行到电脑系统时间的后三天内这段时间内的所有行,麻烦老师帮我写下代码,谢谢!

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/12 20:59:00 [只看该作者]


DataTables("表A").LoadFilter = "日期 <= '"  &  Date.Today.Adddays(3) & "'"

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


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2019/4/12 21:16:00 [只看该作者]

老师,试了下,还是会显示全部行,代码我是放在项目属性的AfterOpenProject里面

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/12 21:52:00 [只看该作者]

代码没有问题。可以有其他地方又重新加载数据了。上传实例看看

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


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2019/4/12 22:17:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip

 

老师,已上传

我想打开项目后显示的行是从2019-03-25到2019-04-15,因为今天是12号,三天后是15号,麻烦老师帮我测试下,谢谢!


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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/12 22:39:00 [只看该作者]

没看到您项目有任何的代码
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


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


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2019/4/12 23:00:00 [只看该作者]

老师,我是外部数据源,代码要怎么修改,麻烦老师帮我改下,谢谢!

If e.DataTableName = "表A" Then
    e.Filter = "[日期] <= #" & Date.Today.AddDays(3) & "#" 
End If

 回到顶部
总数 13 1 2 下一页