同一问题，提出几次，没有解决，再次提出。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 同一问题，提出几次，没有解决，再次提出。

共有1656人关注过本帖树形打印复制链接主题：同一问题，提出几次，没有解决，再次提出。

lihe60

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：6843 积分：43298 威望：0 精华：0 注册：2009/3/2 14:07:00

同一问题，提出几次，没有解决，再次提出。 发帖心情

Post By：2017/3/16 13:30:00 [显示全部帖子]

问题是：127.0.0.1:88 / list，显示各产品的汇总数。希望选中某行，点“明细”按钮能筛选出某产品的相关数据。

下载信息 [文件大小：下载次数： ]
点击浏览该文件:新建文件夹.rar

[此贴子已经被作者于2017/3/16 14:16:22编辑过]

lihe60

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：6843 积分：43298 威望：0 精华：0 注册：2009/3/2 14:07:00

Post By：2017/3/16 15:27:00 [显示全部帖子]

以下是引用有点色在2017/3/16 15:02:00的发言：

要说多少遍？取值，然后赋值。

        var k1 = table1.rows[0].cells[0].innerHTML;
        var k2 = table1.rows[table1.rowSel].cells[0].innerHTML;
        location="/mx?key1=" + k1 + "&key2=" + k2;

需要通过代码进一步筛选。需要把这个K1和K2的值传递给变量的。

如何实现呀？

[此贴子已经被作者于2017/3/16 15:28:25编辑过]

lihe60

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：6843 积分：43298 威望：0 精华：0 注册：2009/3/2 14:07:00

Post By：2017/3/16 16:28:00 [显示全部帖子]

以下是引用有点色在2017/3/16 16:00:00的发言：
看你内部函数mx啊，直接获取key1和key2的值啊

内部函数mx

Dim e As RequestEventArgs = args(0)
'获取该页数据
Dim cm d As New SQLCo mmand
'cmd.Conn ect i '记得设置数据源名称
cmd.Comm andText = "Sel ect 产品,数量 Fro m {订单} where 产品='梨'"
Dim dt As DataTable = cmd.Exe cuteReader
Dim wb As New WeUI
Se lect Case e.Path
    Case "mx"
        '根据此页数据生成网页
        With wb.AddTable("","Table1")
            .CreateFromDataTable(dt)
        End With
        e.WriteString(wb.Build)
End Se lect

根据没有哇