Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何实现多个查询表分页显示


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

主题：如何实现多个查询表分页显示
帅哥，在线噢！
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 9:01:00 [显示全部帖子]

添加不同的窗口表，sqlquery类型，绑定不同的视图就行了。至于计时器的用法，之前不是已经实现了吗

 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 10:06:00 [显示全部帖子]

代码？代码？代码？

 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 10:33:00 [显示全部帖子]

看看：http://www.foxtable.com/webhelp/topics/1907.htm

SQLTable不仅会生成一个Table，还会生成一个DataTable，名称都是：

窗口名称_控件名称

例如窗口1中插入了一个名为Table1的Table，类型为SQLTable，那么窗口打开后，可以分别通过：

Tables("窗口1_Table1")
DataTables("窗口1_Table1")

来引用其生成的Table和DataTable，这些对象在打开窗口时自动生成，在关闭窗口后将自动删除
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 11:54:00 [显示全部帖子]

e.Form.Controls("TextBox5").Value = "第" & 1 & "页/共" & .Totalpages  ......

 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 14:46:00 [显示全部帖子]

应该是表格没有数据吧

 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 14:56:00 [显示全部帖子]

afterload代码：
Tables("看板_Table1").Fill ("Select [单线别],[订单编号],[产品型号],[数量] Fr om [KB_今日计划明细]","zzkb",True)
With DataTables("看板_Table1")
.LoadFilter = ""   ‘清除加载条件
.LoadPage = 0      ‘加载第一页
.LoadTop = 6        ‘每页6行
.Load()
e.Form.Controls("TextBox5").Value = "第" & 1 & "页/共" & .Totalpages           
End With
 回到顶部
帅哥，在线噢！
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 16:14:00 [显示全部帖子]

运行时把Fr om里面的空格去掉啊

 回到顶部
帅哥，在线噢！
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 16:27:00 [显示全部帖子]

我测试没有问题。上传实例说明

 回到顶部
帅哥，在线噢！
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107028 积分：544371 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/11/6 17:50:00 [显示全部帖子]

表没有主键导致的，指定一下加载依据

With DataTables("看板_Table1")
    .LoadFilter = ""   '清除加载条件
    .LoadPage = 0      '加载第一页
    .LoadTop = 6  
    .LoadOver = "单线别"      '或者其它唯一列
    .Load()
msgbox(.Totalpages)
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 5 次数据查询