Foxtable(狐表)用户栏目专家坐堂 → [求助]查询数据量过大,界面就直接空白了,怎么处理??


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

主题:[求助]查询数据量过大,界面就直接空白了,怎么处理??

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


加好友 发短信
等级:小狐 帖子:395 积分:639 威望:0 精华:0 注册:2018/3/5 14:40:00
[求助]查询数据量过大,界面就直接空白了,怎么处理??  发帖心情 Post By:2018/11/30 9:36:00 [显示全部帖子]


'下面这一段代码,查询数据量过大,界面就直接空白了,怎么处理??
    With wb.AddPanelGroup("","pg1","") '"通讯录<a href='#' style='color: #FF0000;'>[企业]</a>")
        Dim drs As List(Of DataRow) '获取所有课程为False的数据
        drs = DataTables("WXUsersLogn").Sel ect("姓名<>'' and 企业码=" & qym,"企业码 desc")
        Dim idx As Integer = 0
        For Each dr As DataRow In drs
            idx+=1
            '.Add("pn1","&nbsp;&nbsp;&nbsp;" & dr("姓名"),"&nbsp;&nbsp;&nbsp;联系电话:" & dr("联系电话"),dr("headimgurl")).Attribute = ""
            .Add("pn" & idx,"&nbsp;&nbsp;&nbsp;" & dr("姓名"),"&nbsp;&nbsp;&nbsp;联系电话:" & dr("联系电话"),dr("headimgurl")).Attribute = " & idx & "')"""
            With wb.AddDialog("","dlg" & idx,"温馨提示","您是否需要联系他(她)?")
                .AddButton("btn" & idx,"呼叫").Attribute = ""
                .AddButton("btnCancel" & idx,"取消").Kind = 1
            End With
        Next
    End With

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


加好友 发短信
等级:小狐 帖子:395 积分:639 威望:0 精华:0 注册:2018/3/5 14:40:00
  发帖心情 Post By:2018/11/30 9:50:00 [显示全部帖子]

弹出数字 19

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


加好友 发短信
等级:小狐 帖子:395 积分:639 威望:0 精华:0 注册:2018/3/5 14:40:00
  发帖心情 Post By:2018/11/30 9:55:00 [显示全部帖子]

这段代码,如何改成分页效果??

 回到顶部