Foxtable(狐表) → 用户栏目 → 专家坐堂 → 基于panel做页面到底部自动加载


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

主题：基于panel做页面到底部自动加载
帅哥哟，离线，有人找我吗？
有点蓝
 小大  31楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106097 积分：539590 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/3/31 20:45:00 [只看该作者]

调试看弹出什么内容

......
If dr IsNot Nothing Then
    If dr("性别") = "男" Then
        drs = DataTables("女生发起").sqlSelect("[男_手机] = '" & username & "'","发起_日期 DESC")  '从订单表找,个人订单集合
        msgbox("男1=" & drs.count)
    Else If dr("性别") = "女" Then
        drs = DataTables("男生发起").sqlSelect("[女_手机] = '" & username & "'","发起_日期 DESC")  '从订单表找,个人订单集合
        msgbox("女1=" & drs.count)
    Else If dr("性别") = "" Then
        msgbox("会员性别为空!")
    Else If dr("性别") <> "男" OrElse dr("性别") <> "女" Then
        msgbox("会员性别错误填写!")
    End If
Else
    msgbox("未找到您的会员账号!")
End If
.....
 回到顶部
帅哥哟，离线，有人找我吗？
zhangjian222200
 小大  32楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1528 积分：10778 威望：0 精华：0 注册：2016/9/12 11:18:00 		  发帖心情 Post By：2017/3/31 20:59:00 [只看该作者]

30楼在发帖时，已做了31楼的工作，只是分开显示的，msgbox("男1"）及 msgbox(drs.count)显示为0 

但是涉及后台的表都有，后台表的名字、列名也是对的，查询的行也存在，但是drs.count还是为0，麻烦瞧瞧！

项目文件在30楼
[此贴子已经被作者于2017/3/31 21:05:35编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  33楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106097 积分：539590 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/3/31 21:06:00 [只看该作者]

如果31楼的模式弹出的结果还是为0，说明肯定是数据有问题，不存在此记录，或者数据有空格控制符等，检查自己的数据

If dr IsNot Nothing Then
    If dr("性别") = "男" Then
        drs = DataTables("女生发起").sqlSelect("[男_手机] = '" & username & "'","发起_日期 DESC")  '从订单表找,个人订单集合
        msgbox("男1=" & drs.count & ",filter=" & "[男_手机] = '" & username & "'")
    Else If dr("性别") = "女" Then
        drs = DataTables("男生发起").sqlSelect("[女_手机] = '" & username & "'","发起_日期 DESC")  '从订单表找,个人订单集合
        msgbox("女1=" & drs.count & ",filter=" & "[女_手机] = '" & username & "'")
    Else If dr("性别") = "" Then
        msgbox("会员性别为空!")
    Else If dr("性别") <> "男" OrElse dr("性别") <> "女" Then
        msgbox("会员性别错误填写!")
    End If
Else
    msgbox("未找到您的会员账号!")
End If

把查询条件放到数据库去执行看有没有结果

建议还是使用日志的方式进行调试，可以方便的拷贝查询条件
 回到顶部
帅哥哟，离线，有人找我吗？
zhangjian222200
 小大  34楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1528 积分：10778 威望：0 精华：0 注册：2016/9/12 11:18:00 		  发帖心情 Post By：2017/3/31 22:14:00 [只看该作者]

后台表、数据，没有变动的情况下
我做了个窗口，添加一个按钮，按钮click时间代码如下：
（与30楼文件查找方法相同：从后台“男生发起表”，找“女_手机”为“18961305239”的行）

Dim drs As List(of DataRow) = DataTables("男生发起").SQLSelect("[女_手机] = '18961305239'") 
msgbox("女人数=" & drs.count)

运行提示15人，截图如下：

图片点击可在新窗口打开查看此主题相关图片如下：qq图片20170331221140000000000.png
图片点击可在新窗口打开查看

说明找到人了，记录存在，但是在移动版中，就找不到，如下图：

图片点击可在新窗口打开查看此主题相关图片如下：qq图片2017033122174411111111.png
图片点击可在新窗口打开查看

难道是bug？项目测试文件及测试账号密码在30楼

[此贴子已经被作者于2017/3/31 22:29:02编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  35楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106097 积分：539590 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/3/31 22:52:00 [只看该作者]

请按照33楼的方式获取查看有问题的页面的查询条件，直接hardcode指定条件的测试方法永远查不出原因

 回到顶部
帅哥哟，离线，有人找我吗？
zhangjian222200
 小大  36楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1528 积分：10778 威望：0 精华：0 注册：2016/9/12 11:18:00 		  发帖心情 Post By：2017/3/31 23:32:00 [只看该作者]

后台表、数据，没有变动的情况下
直接在移动版页面，将排序去掉，再测试，得到正确的结果（加或不加Trim()，都得到正确结果），见图
修改见粉色部分
但是加上排序即为0，怎么回事？
            If dr IsNot Nothing Then
                If dr("性别") = "男" Then
                    msgbox(dr("性别"))
                    drs = DataTables("女生发起").sqlSelect("[男_手机] = '" & username.Trim() & "'","[发起_日期] DESC")  '从订单表找,个人订单集合 
                    msgbox("男手机=" & username)
                    msgbox("男人数=" & drs.count)
                Else If dr("性别") = "女" Then
                    msgbox(dr("性别"))
                    drs = DataTables("男生发起").SQLSelect("[女_手机] = '" & username.Trim() & "'") ',"[发起_日期] DESC")  '从订单表找,个人订单集合       
                    msgbox("女手机=" & username & "女人数=" & drs.count)
                Else If dr("性别") = "" Then
                    msgbox("会员性别为空!")
                Else If dr("性别") <> "男" OrElse dr("性别") <> "女" Then
                    msgbox("会员性别错误填写!")
                End If
            Else
                msgbox("未找到您的会员账号!")
            End If

图片点击可在新窗口打开查看此主题相关图片如下：qq图片201703312330555555555555555.png
图片点击可在新窗口打开查看


[此贴子已经被作者于2017/4/1 8:11:18编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  37楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106097 积分：539590 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/4/1 8:35:00 [只看该作者]

俺也看漏了，加多一个逗号

drs = DataTables("女生发起").sqlSelect("[男_手机] = '" & username.Trim() & "'",,"[发起_日期] DESC") 


SQLSelect(Filter,Top,Sort)

Filter： 查询条件，采用的是SQL语法，和常规表达式的语法有所不同，请参考：SQL表达式的语法差异。
Top：    可选参数，指定返回的行数
Sort：   可选参数，指定查询顺序，和Top配合使用。
 回到顶部
帅哥哟，离线，有人找我吗？
zhangjian222200
 小大  38楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1528 积分：10778 威望：0 精华：0 注册：2016/9/12 11:18:00 		  发帖心情 Post By：2017/4/1 10:59:00 [只看该作者]

插入页面成功

插入新页面前，在页面底部显示“正在加载”，怎么做？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  39楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106097 积分：539590 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/4/1 11:09:00 [只看该作者]

加一个PageFooter或者放一个label控件显示文字，不需要的时候把visible设置为false

 回到顶部
帅哥哟，离线，有人找我吗？
zhangjian222200
 小大  40楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1528 积分：10778 威望：0 精华：0 注册：2016/9/12 11:18:00 		  发帖心情 Post By：2017/4/1 14:44:00 [只看该作者]

根据5楼的js例子，下面粉色部分是我自己添加，用于显示左右滚动，这样可以？还请指导

$(document).ready(function() {
            $(window).scroll(function() {
                //$(document).scrollTop() 获取垂直滚动的距离
                //$(document).scrollLeft() 这是获取水平滚动条的距离

                if ($(document).scrollTop() <= 0) {
                    alert("滚动条已经到达顶部为0");
                }

                if ($(document).scrollTop() >= $(document).height() - $(window).height()) {
                    alert("滚动条已经到达底部为" + $(document).scrollTop());
                }

                if ($(document).scrollLeft() <= 0) {
                    alert("滚动条已经到达左面为0");
                }

                if ($(document).scrollLeft() >= $(document).Width() - $(window).Width()) {
                    alert("滚动条已经到达右面为" + $(document).scrollleft());
                }
            });
        });
 回到顶部
总数 43 上一页 1 2 3 4 5 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06445 秒, 4 次数据查询