Foxtable(狐表)用户栏目专家坐堂 → [求助]请教怎么模糊查询后分页加载呀


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

主题:[求助]请教怎么模糊查询后分页加载呀

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


加好友 发短信
等级:婴狐 帖子:17 积分:220 威望:0 精华:0 注册:2012/10/9 12:36:00
[求助]请教怎么模糊查询后分页加载呀  发帖心情 Post By:2015/12/15 11:59:00 [显示全部帖子]

Dim txt As String = e.Form.Controls("xmcxnr_mhcx").Text
Dim tbl As Table = Tables("项目查询_项目信息")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.Filter = "AAA Like " & txt & " Or BBB Like " & txt & " Or CCC Like " & txt
   End If

之后怎么分页加载呀,就是怎么跟分页代码关联
With Tables("项目查询_项目信息").DataTable
    .loadFilter = " " 
    .LoadTop =10
    .LoadPage =0
    .LoadReverse = True
    .Load()
Forms("项目查询").Controls("共几页").Value = 1 & "/" & .TotalPages

才疏学浅,望指教



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


加好友 发短信
等级:婴狐 帖子:17 积分:220 威望:0 精华:0 注册:2012/10/9 12:36:00
  发帖心情 Post By:2015/12/15 12:25:00 [显示全部帖子]

感谢超版,麻烦再教下,我想不在textbox直接查询,想通过按钮实现,这个按钮的代码应该怎么写

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


加好友 发短信
等级:婴狐 帖子:17 积分:220 威望:0 精华:0 注册:2012/10/9 12:36:00
  发帖心情 Post By:2015/12/15 12:55:00 [显示全部帖子]

问了个愚蠢的问题,呵呵,已经会了,不麻烦了,谢谢

 回到顶部