conn库 数据库分页读取例程

光庆 2024-4-7 1576

请将godking.conn库升级至最新版。

Code AardioLine:32复制
  • 1.
  • 2.
  • 3.
  • 4.
  • 5.
  • 6.
  • 7.
  • 8.
  • 9.
  • 10.
  • 11.
  • 12.
  • 13.
  • 14.
  • 15.
  • 16.
  • 17.
  • 18.
  • 19.
  • 20.
  • 21.
  • 22.
  • 23.
  • 24.
  • 25.
  • 26.
  • 27.
  • 28.
  • 29.
  • 30.
  • 31.
  • 32.
    • import win.ui;
    • import godking.vlistEx
    • import godking.conn
    • /*DSG{{*/
    • var winform = win.form(text="aardio form";right=759;bottom=469)
    • winform.add(
    • button={cls="button";text="下一页";left=520;top=400;right=616;bottom=448;z=2};
    • button2={cls="button";text="上一页";left=168;top=400;right=264;bottom=448;z=3};
    • vlist={cls="vlistEx";text="自定义控件";left=16;top=8;right=744;bottom=376;frame=1;z=1}
    • )
    • /*}}*/
    • var db = godking.conn.openAccess( "C:\Users\Administrator\Desktop\caiba.mdb",);
    • var rs = db.rs("caiba");
    • rs.PageSize = 10;
    • var curpage = 1;
    • winform.vlist.setTable(rs.getPageTable(curpage));
    • winform.button2.oncommand = function(id,event){
    • if curpage<=1 return ;
    • curpage--;
    • winform.vlist.setTable(rs.getPageTable(curpage),false);
    • }
    • winform.button.oncommand = function(id,event){
    • if curpage>=rs.PageCount return ;
    • curpage++;
    • winform.vlist.setTable(rs.getPageTable(curpage),false);
    • }
    • winform.show();
    • win.loopMessage();


    上传的附件:
    最新回复 (8)
    • redchina 13天前
      0 2
      请问如果想上例子中使用 godking.imgPager 来 实现上下翻页和跳转功能应该如何实现
    • redchina 13天前
      0 3
      对控件进行初始化,点下一页数据就全没有,不知什么原因: pager.defaultColWidth = {50,100,100,100,100,100,80,80,-1}; pager.init(tableData, 20, null);//tableData // 添加分页事件处理 pager.onSelect = function() { mainForm.vlist.setChecked(mainForm.vlist.getSelected(), true); }; pager.onUnSelect = function() { mainForm.vlist.setChecked(mainForm.vlist.getSelected(), false); };
    • 光庆 13天前
      0 4
      redchina 对控件进行初始化,点下一页数据就全没有,不知什么原因: pager.defaultColWidth = {50,100,100,100,100,100,80,80,-1}; pager.init( ...
      Code AardioLine:31复制
    • 1.
    • 2.
    • 3.
    • 4.
    • 5.
    • 6.
    • 7.
    • 8.
    • 9.
    • 10.
    • 11.
    • 12.
    • 13.
    • 14.
    • 15.
    • 16.
    • 17.
    • 18.
    • 19.
    • 20.
    • 21.
    • 22.
    • 23.
    • 24.
    • 25.
    • 26.
    • 27.
    • 28.
    • 29.
    • 30.
    • 31.
      • import win.ui;
      • import godking.vlistEx;
      • import godking.imgPager;
      • /*DSG{{*/
      • mainForm = win.form(text="电话号码本";right=938;bottom=595)
      • mainForm.add(
      • button={cls="button";text="新增";left=219;top=10;right=308;bottom=39;z=5};
      • edit={cls="edit";left=56;top=13;right=204;bottom=40;edge=1;z=3};
      • plus={cls="plus";left=36;top=559;right=586;bottom=594;db=1;dl=1;notify=1;z=1};
      • static={cls="static";text="查询:";left=24;top=15;right=53;bottom=40;transparent=1;z=4};
      • vlist={cls="vlistEx";left=4;top=47;right=932;bottom=556;ah=1;aw=1;dl=1;dt=1;edge=1;z=2}
      • )
      • /*}}*/
      • //连接数据库
      • import godking.conn
      • var db = godking.conn.openAccess("/Database.accdb"/*文件名*/,/*密码*/)
      • //初始显示数据
      • var sql = "select id,pname as 姓名,age as 年龄,addr as 地址 from [人员名单] order by id"
      • var tableData = db.getTable( sql,false/*数组*/,/*开始行*/,/*总行数*/,/*格式化参数*/ );
      • // 启用分页功能
      • var pager = godking.imgPager(mainForm.plus, mainForm.vlist, "blue");
      • // 初始化分页控件
      • pager.defaultColWidth = {50,100,100,100};
      • pager.init(tableData, 10, null);//tableData
      • mainForm.show();
      • win.loopMessage();


    • redchina 13天前
      0 5
      谢谢,这两个库写的很好,代码非常高效!
    • redchina 10天前
      0 6
      这个代码F可以正常运行,但编译后不能运行,提示报错,--------------------------- aardio 工程8.exe --------------------------- {Line}:#27 {File}:main.aardio: ---------------------- {Attempt to}: _set table {Kind}:variable(local) {Name}:'pager' {Type}:null --------------------------- 确定 ---------------------------
    • redchina 10天前
      0 7
      限制使用了吗
    • redchina 8天前
      0 8
      在风行者的帮助下,找到问题了是资源目录写的不对,应该将blue文件夹放到工程\res\中,var pager = godking.imgPager(mainForm.plus, mainForm.vlist, "\res\blue");
    • redchina 6天前
      0 9
      还有一个问题,如何通过姓名字段的首字母进行查询数据
    返回