高级表格:编辑框输入关键字搜索内容，分页

南絮

想问下子:
1.子程序--搜索眯会 ()是模糊cha询搜索的关键字，就是想要给模糊cha询分页子是不是得先获取模糊cha询的总数再给模糊cha询分页
再写代码 首页  上一页  下一页  尾页

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
数据库句柄	整数型

子程序名	返回值类型	公开	备 注
_窗口1_创建完毕

' ' ' mysql句柄连接数据库' ' '
mysql句柄 ＝ 连接MySql (“127.0.0.1”, “root”, “Zangroot”, “test”, 3306)
如果真 (mysql句柄 ＝ 0)
窗口1.标题 ＝ 窗口1.标题 ＋ “连接失败,请检查网络！”
返回 ()
' ' ' 乱码格式化
执行SQL语句 (mysql句柄, “SET NAMES GBK”)
调试输出 (mysql句柄)
' ' ' 1: #表格常量.文本型； 5: #表格常量.选择型； 6: #表格常量.图片型；。
计次循环首 (index, i)
高级表格1.置数据 (0, 0, 1, “序号”)
高级表格1.置数据 (0, 1, 1, “姓名”)
高级表格1.置数据 (0, 2, 1, “数字1”)
高级表格1.置数据 (0, 3, 1, “数字2”)
高级表格1.置数据 (0, 4, 1, “数字3”)
计次循环尾 ()
' 每页显示 ＝ 51
' 获取数据总数 ()

子程序名	返回值类型	公开	备 注
_窗口1_将被销毁

断开MySql (数据库句柄)

子程序名	返回值类型	公开	备 注
_按钮1_搜索_被单击

搜索眯会 ()

子程序名	返回值类型	公开	备 注
搜索眯会

高级表格1.选择整行 ＝ 真
高级表格1.禁止 ＝ 假
判断 (编辑框1.内容 ＝ “”)
返回 ()


返回文本呢 ＝ 分割文本 (编辑框1.内容, “ ”, )
判断 (取数组成员数 (返回文本呢) ＞ 1)
调试输出 (执行SQL语句 (mysql句柄, “select * from tble where user like '%” ＋ 返回文本呢 [1] ＋ “%' OR user like '%” ＋ 返回文本呢 [2] ＋ “%'”))
局部_记录集行数 ＝ 取记录集行数 (局部_记录集句柄)
计次循环首 (局部_记录集行数, i)
到指定行 (局部_记录集句柄, i － 1)
读字段值 (局部_记录集句柄, “id”, id)
读字段值 (局部_记录集句柄, “user”, user)
读字段值 (局部_记录集句柄, “pass”, pass)
读字段值 (局部_记录集句柄, “status”, status)
读字段值 (局部_记录集句柄, “point”, point)
' 高级表格1.置数据 (i, 0, #表格常量.文本型, id)
高级表格1.置数据 (i, 0, #表格常量 .文本型, i)
高级表格1.置数据 (i, 1, #表格常量 .文本型, user)
高级表格1.置数据 (i, 2, #表格常量 .文本型, pass)
高级表格1.置数据 (i, 3, #表格常量 .文本型, status)
高级表格1.置数据 (index ＋ 1, 4, #表格常量 .文本型, point)
计次循环尾 ()

调试输出 (执行SQL语句 (mysql句柄, “select * from tble where user like '%” ＋ 返回文本呢 [1] ＋ “%'”))
局部_记录集句柄 ＝ 取记录集 (mysql句柄)
局部_记录集行数 ＝ 取记录集行数 (局部_记录集句柄)
计次循环首 (局部_记录集行数, i)
到指定行 (局部_记录集句柄, i － 1)
读字段值 (局部_记录集句柄, “id”, id)
读字段值 (局部_记录集句柄, “user”, user)
读字段值 (局部_记录集句柄, “pass”, pass)
读字段值 (局部_记录集句柄, “status”, status)
读字段值 (局部_记录集句柄, “point”, point)
' 高级表格1.置数据 (i, 0, #表格常量.文本型, id)
高级表格1.置数据 (i, 0, #表格常量 .文本型, i)
高级表格1.置数据 (i, 1, #表格常量 .文本型, user)
高级表格1.置数据 (i, 2, #表格常量 .文本型, pass)
高级表格1.置数据 (i, 3, #表格常量 .文本型, status)
高级表格1.置数据 (i, 4, #表格常量 .文本型, point)
计次循环尾 ()

释放记录集 (局部_记录集句柄)

子程序名	返回值类型	公开	备 注
_首页按钮_被单击

子程序名	返回值类型	公开	备 注
_上一页按钮_被单击

子程序名	返回值类型	公开	备 注
_下一页按钮_被单击

子程序名	返回值类型	公开	备 注
_尾页按钮_被单击

子程序名	返回值类型	公开	备 注
_编辑框1_获得焦点

如果真 (编辑框1.内容 ＝ “请输入关键字”)
编辑框1.内容 ＝ “”

子程序名	返回值类型	公开	备 注
_编辑框1_失去焦点

如果真 (编辑框1.内容 ＝ “ ”)
编辑框1.内容 ＝ “请输入关键词”

i支持库列表	支持库注释
mysql	MySql支持库
spec	特殊功能支持库
eGrid	高级表格支持库

.版本 2<br /> .支持库 mysql<br /> .支持库 spec<br /> .支持库 eGrid<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 数据库句柄, 整数型<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> ' ' ' mysql句柄连接数据库' ' '<br /> mysql句柄 ＝ 连接MySql (“127.0.0.1”, “root”, “Zangroot”, “test”, 3306)<br /> .如果真 (mysql句柄 ＝ 0)<br />     窗口1.标题 ＝ 窗口1.标题 ＋ “连接失败,请检查网络！”<br />     返回 ()<br /> .如果真结束<br /> ' ' ' 乱码格式化<br /> 执行SQL语句 (mysql句柄, “SET NAMES GBK”)<br /> 调试输出 (mysql句柄)<br /> ' ' ' 1: #表格常量.文本型； 5: #表格常量.选择型； 6: #表格常量.图片型；。<br /> .计次循环首 (index, i)<br />     高级表格1.置数据 (0, 0, 1, “序号”)<br />     高级表格1.置数据 (0, 1, 1, “姓名”)<br />     高级表格1.置数据 (0, 2, 1, “数字1”)<br />     高级表格1.置数据 (0, 3, 1, “数字2”)<br />     高级表格1.置数据 (0, 4, 1, “数字3”)<br /> .计次循环尾 ()<br /> ' 每页显示 ＝ 51<br /> ' 获取数据总数 ()<br /> <br /> <br /> .子程序 _窗口1_将被销毁<br /> <br /> 断开MySql (数据库句柄)<br /> <br /> <br /> .子程序 _按钮1_搜索_被单击<br /> <br /> 搜索眯会 ()<br /> <br /> .子程序 搜索眯会<br /> <br /> 高级表格1.选择整行 ＝ 真<br /> 高级表格1.禁止 ＝ 假<br /> <br /> <br /> .判断开始 (编辑框1.内容 ＝ “”)<br />     返回 ()<br /> .默认<br /> <br />     返回文本呢 ＝ 分割文本 (编辑框1.内容, “ ”, )<br />     .判断开始 (取数组成员数 (返回文本呢) ＞ 1)<br />         调试输出 (执行SQL语句 (mysql句柄, “select * from tble where user like '%” ＋ 返回文本呢 [1] ＋ “%' OR user like '%” ＋ 返回文本呢 [2] ＋ “%'”))<br />         局部_记录集行数 ＝ 取记录集行数 (局部_记录集句柄)<br />         .计次循环首 (局部_记录集行数, i)<br />             到指定行 (局部_记录集句柄, i － 1)<br />             读字段值 (局部_记录集句柄, “id”, id)<br />             读字段值 (局部_记录集句柄, “user”, user)<br />             读字段值 (局部_记录集句柄, “pass”, pass)<br />             读字段值 (局部_记录集句柄, “status”, status)<br />             读字段值 (局部_记录集句柄, “point”, point)<br />             ' 高级表格1.置数据 (i, 0, #表格常量.文本型, id)<br />             高级表格1.置数据 (i, 0, #表格常量.文本型, i)<br />             高级表格1.置数据 (i, 1, #表格常量.文本型, user)<br />             高级表格1.置数据 (i, 2, #表格常量.文本型, pass)<br />             高级表格1.置数据 (i, 3, #表格常量.文本型, status)<br />             高级表格1.置数据 (index ＋ 1, 4, #表格常量.文本型, point)<br />         .计次循环尾 ()<br /> <br />     .默认<br />         调试输出 (执行SQL语句 (mysql句柄, “select * from tble where user like '%” ＋ 返回文本呢 [1] ＋ “%'”))<br />         局部_记录集句柄 ＝ 取记录集 (mysql句柄)<br />         局部_记录集行数 ＝ 取记录集行数 (局部_记录集句柄)<br />         .计次循环首 (局部_记录集行数, i)<br />             到指定行 (局部_记录集句柄, i － 1)<br />             读字段值 (局部_记录集句柄, “id”, id)<br />             读字段值 (局部_记录集句柄, “user”, user)<br />             读字段值 (局部_记录集句柄, “pass”, pass)<br />             读字段值 (局部_记录集句柄, “status”, status)<br />             读字段值 (局部_记录集句柄, “point”, point)<br />             ' 高级表格1.置数据 (i, 0, #表格常量.文本型, id)<br />             高级表格1.置数据 (i, 0, #表格常量.文本型, i)<br />             高级表格1.置数据 (i, 1, #表格常量.文本型, user)<br />             高级表格1.置数据 (i, 2, #表格常量.文本型, pass)<br />             高级表格1.置数据 (i, 3, #表格常量.文本型, status)<br />             高级表格1.置数据 (i, 4, #表格常量.文本型, point)<br />         .计次循环尾 ()<br />     .判断结束<br /> <br /> .判断结束<br /> 释放记录集 (局部_记录集句柄)<br /> <br /> <br /> .子程序 _首页按钮_被单击<br /> <br /> <br /> <br /> .子程序 _上一页按钮_被单击<br /> <br /> <br /> <br /> .子程序 _下一页按钮_被单击<br /> <br /> <br /> <br /> .子程序 _尾页按钮_被单击<br /> <br /> <br /> <br /> .子程序 _编辑框1_获得焦点<br /> <br /> .如果真 (编辑框1.内容 ＝ “请输入关键字”)<br />     编辑框1.内容 ＝ “”<br /> .如果真结束<br /> <br /> <br /> .子程序 _编辑框1_失去焦点<br /> <br /> .如果真 (编辑框1.内容 ＝ “ ”)<br />     编辑框1.内容 ＝ “请输入关键词”<br /> .如果真结束

南絮

想问下  搜索眯会 () 代码只能查看数据50条，后面的数据怎么下一页显示

jcos

直接查有少条，之后分页

子程序--搜索眯会 ()
要传个参数, 比如 搜索眯会 (分页)

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
分页	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

分页 ＝ 10
搜索咪会 (分页)

子程序名	返回值类型	公开	备 注
搜索咪会
参数名	类 型	参考	可空	数组	备 注
页数	整数型

' 注: sql语句后加 +到文本(分页)
调试输出 (页数)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 分页, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 分页 ＝ 10<br /> 搜索咪会 (分页)<br /> <br /> .子程序 搜索咪会<br /> .参数 页数, 整数型<br /> <br /> ' 注: sql语句后加 +到文本(分页)<br /> 调试输出 (页数)

以下是我现在用的分页

  

子程序名	返回值类型	公开	备 注
页状态检查

如果真 (到整数 (标签_页数.标题) ＝ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ＝ 1)  ' 这里是只有一页
连续赋值 (真, 按钮_首页.禁止, 按钮_上一页.禁止, 按钮_下一页.禁止, 按钮_尾页.禁止)
如果真 (到整数 (标签_页数.标题) ＞ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ＝ 1)  ' 这里是有多页，但是停留在第一页
连续赋值 (真, 按钮_首页.禁止, 按钮_上一页.禁止)
连续赋值 (假, 按钮_下一页.禁止, 按钮_尾页.禁止)
如果真 (到整数 (标签_页数.标题) ＝ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ≠ 1)  ' 这里是到了最后一页
连续赋值 (假, 按钮_首页.禁止, 按钮_上一页.禁止)
连续赋值 (真, 按钮_下一页.禁止, 按钮_尾页.禁止)
如果真 (到整数 (标签_页数.标题) ≠ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ≠ 1)  ' 这里是中间页数
连续赋值 (假, 按钮_首页.禁止, 按钮_上一页.禁止, 按钮_下一页.禁止, 按钮_尾页.禁止)

子程序名	返回值类型	公开	备 注
_按钮_首页_被单击			分页

标签_当前.内容 ＝ “1”
搜索咪会 (&获取剧集, 类别, 1)

子程序名	返回值类型	公开	备 注
_按钮_上一页_被单击			分页

标签_当前.内容 ＝ 到文本 (到整数 (标签_当前.内容) － 1)
搜索咪会 (到整数 (标签_当前.内容))

子程序名	返回值类型	公开	备 注
_按钮_下一页_被单击			分页

标签_当前.内容 ＝ 到文本 (到整数 (标签_当前.内容) ＋ 1)
搜索咪会 (到整数 (标签_当前.内容))

子程序名	返回值类型	公开	备 注
_按钮_尾页_被单击			分页

标签_当前.内容 ＝ 标签_页数.标题
搜索咪会 (到整数 (标签_当前.内容))

i支持库列表	支持库注释
iext2	扩展界面支持库二

.版本 2<br /> .支持库 iext2<br /> <br /> .子程序 页状态检查<br /> <br /> .如果真 (到整数 (标签_页数.标题) ＝ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ＝ 1)  ' 这里是只有一页<br />     连续赋值 (真, 按钮_首页.禁止, 按钮_上一页.禁止, 按钮_下一页.禁止, 按钮_尾页.禁止)<br /> .如果真结束<br /> .如果真 (到整数 (标签_页数.标题) ＞ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ＝ 1)  ' 这里是有多页，但是停留在第一页<br />     连续赋值 (真, 按钮_首页.禁止, 按钮_上一页.禁止)<br />     连续赋值 (假, 按钮_下一页.禁止, 按钮_尾页.禁止)<br /> .如果真结束<br /> .如果真 (到整数 (标签_页数.标题) ＝ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ≠ 1)  ' 这里是到了最后一页<br />     连续赋值 (假, 按钮_首页.禁止, 按钮_上一页.禁止)<br />     连续赋值 (真, 按钮_下一页.禁止, 按钮_尾页.禁止)<br /> .如果真结束<br /> .如果真 (到整数 (标签_页数.标题) ≠ 到整数 (标签_当前.内容) 且 到整数 (标签_当前.内容) ≠ 1)  ' 这里是中间页数<br />     连续赋值 (假, 按钮_首页.禁止, 按钮_上一页.禁止, 按钮_下一页.禁止, 按钮_尾页.禁止)<br /> <br /> .版本 2<br /> <br /> .子程序 _按钮_首页_被单击, , , 分页<br /> <br /> 标签_当前.内容 ＝ “1”<br /> 搜索咪会(&获取剧集, 类别, 1)<br /> <br /> .子程序 _按钮_上一页_被单击, , , 分页<br /> <br /> 标签_当前.内容 ＝ 到文本 (到整数 (标签_当前.内容) － 1)<br /> 搜索咪会 (到整数 (标签_当前.内容))<br /> <br /> .子程序 _按钮_下一页_被单击, , , 分页<br /> <br /> 标签_当前.内容 ＝ 到文本 (到整数 (标签_当前.内容) ＋ 1)<br /> 搜索咪会 (到整数 (标签_当前.内容))<br /> <br /> .子程序 _按钮_尾页_被单击, , , 分页<br /> <br /> 标签_当前.内容 ＝ 标签_页数.标题<br /> 搜索咪会 (到整数 (标签_当前.内容))