Foxtable(狐表) → 用户栏目 → 专家坐堂 → 直接输入网址查询会加载全部内容


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

主题：直接输入网址查询会加载全部内容
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10501 威望：0 精华：0 注册：2013/6/8 16:19:00 		直接输入网址查询会加载全部内容  发帖心情 Post By：2021/8/1 17:47:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (3).txt





直接用127.0.0.1:32177/工资查询内容.htm查询会加载全部内容，有什么办法解决不
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10501 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2021/8/1 22:11:00 [显示全部帖子]

可以帮我弄一下吗，我弄了一天都没有弄好

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


加好友 发短信
等级：七尾狐 帖子：1553 积分：10501 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2021/8/1 22:46:00 [显示全部帖子]

直接提交是也可以查，可是如果单独用这个网址查就会查到全部的内容

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


加好友 发短信
等级：七尾狐 帖子：1553 积分：10501 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2021/8/1 23:27:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:svid_20210801_231353_1.zip


你看一下
[此贴子已经被作者于2021/8/1 23:27:24编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10501 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2021/8/2 11:36:00 [显示全部帖子]


wb.AddForm("","form1","工资查询内容.htm")
        
        With wb.AddInputGroup("form1","ipg1","数据筛选")
            Dim bh As String = e.Cookies("username")
            Dim bh2 As String = "[" & e.Cookies("username") & "]"
            'Group
            Dim ddr As DataRow= DataTables("Users").SQLFind("Name='"& e.Cookies("username")  &"' " )
            If ddr IsNot Nothing AndAlso ddr("Group") = "管理"
                
                Dim sl2 As String = "|" & DataTables("Users").SQLGetComboListString("Name") & "|"
                sl2 = sl2.replace(bh,bh2).TrimEnd("|")
                .AddSelect("product","用户姓名",sl2 )
            Else
                .AddSelect("product","用户姓名",bh2 )
            End If
            
            Dim sl3 As String = "" & DataTables("工资明细表").SQLGetComboListString("年") & ""
            .AddSelect("product1","年",sl3 )
            
            Dim sl4 As String = "" & DataTables("工资明细表").SQLGetComboListString("月") & ""
            .AddSelect("product2","月",sl4 )
        End With


改成下面这样的


sb.AppendLine("<form enctype='multipart/form-data' action='工资查询内容.htm?id=1&page=10' method='post' id='form1' name='form1'>")
sb.AppendLine("用户姓名: <input name='cp' id='cp'><br/><br/>")
        sb.AppendLine("年: <input name='kh' id='kh'><br/><br/>")
        sb.AppendLine("月: <input name='kh1' id='kh'><br/><br/>")
sb.AppendLine("<input type='submit' name='sumbit' id='sumbit' value='提交'>")
        sb.AppendLine("<input type='reset' name='reset' id='reset' value='重置'>")
         sb.AppendLine("</form>")
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 7 次数据查询