| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集1 | ' 本源码来自三叶资源网(www.sanye.cx) | ||
| 变量名 | 类 型 | 数组 | 备 注 |
| 每页记录数 | 整数型 | ||
| 总记录数 | 整数型 | ||
| 记录集游标 | 整数型 | ||
| 当前页数 | 整数型 | ||
| 总页数 | 整数型 |
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| __启动窗口_创建完毕 | |||||
时钟1.时钟周期 ＝ 5000
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _时钟1_周期事件 | |||||
如果 (数据库连接1.连接SQLServer (“192.168.0.199”, “mmcallsystem”, “sa”, “123456lywfyt”) ＝ 假)
信息框 (“数据库连接失败”, 0, , )
记录集1.置连接 (数据库连接1)
记录集1.打开 (“select * from 呼叫记录表 where 完成时间 is Null”, #SQL语句, )
每页记录数 ＝ 5
总记录数 ＝ 记录集1.记录数量 ' 本源码来自三叶资源网(www.sanye.cx)
总页数 ＝ 计算总页数 ()
自动显示定义表 ()
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| 计算总页数 | 整数型 | ||||
判断 (寻找文本 (到文本 (总记录数 ÷ 每页记录数), “.”, , 假) ＝ -1) ' -1为未找到小数点返回 (取整 (总记录数 ÷ 每页记录数))返回 (取整 (总记录数 ÷ 每页记录数))| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| 自动显示定义表 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| temp | 文本型 | |||||
| 行数 | 整数型 | |||||
| K | 整数型 | |||||
高级表格1.行数 ＝ 每页记录数
高级表格1.列数 ＝ 记录集1.字段数量
如果 (总页数 ＞ 1)
时钟1.时钟周期 ＝ 0
变量循环首 (1, 总页数, 1, K)如果 (K ＝ 1)记录集游标 ＝ 1记录集游标 ＝ (K － 1) × 每页记录数 ＋ 1如果 (K ＞ 记录集1.记录数量)K ＝ 1记录集1.移到 (记录集游标)高级表格1.清空数据 ()计次循环首 (每页记录数, 行数)记录集1.读文本 (0, temp)高级表格1.置数据 (行数 － 1, 0, #表格常量 .文本型, temp)记录集1.读文本 (1, temp)高级表格1.置数据 (行数 － 1, 1, #表格常量 .文本型, temp)记录集1.读文本 (2, temp)高级表格1.置数据 (行数 － 1, 2, #表格常量 .文本型, temp)记录集1.读文本 (3, temp)高级表格1.置数据 (行数 － 1, 3, #表格常量 .文本型, temp)记录集1.读文本 (4, temp)记录集1.到下一条 ()
计次循环尾 ()调试输出 (记录集游标)延时 (5000)变量循环尾 ()时钟1.时钟周期 ＝ 5000
| i支持库列表 | 支持库注释 |
| eDB | 数据库操作支持库 |
| eGrid | 高级表格支持库 |
| spec | 特殊功能支持库 |
谢谢分享
