以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  显示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=174243)
--  作者：qazlinle6
--  发布时间：2022/1/6 20:35:00
--  显示
  For Each a As String In dt.getvalues("身份证姓名")
                Dim aaa01 As Double = dt.compute("sum(提成主销业绩)","身份证姓名=\'" & a  & "\' " )
                Dim aaa02 As Double = dt.compute("sum(提成副销业绩)","身份证姓名2=\'" & a  & "\' " )
                
                    With  .Add("pn"& a,a,"<span style=\'color:#0000CD\'>" & "非提成:"& aaa01+aaa02 & " </span>" ,"./images/购物车合计.gif" ,"销售合计明细.htm?id=" & a & "&pv1=" & e.PostValues("xm") )



"pn"& a,a,  可不可以显示 dt.getvalues("身份证姓名")和dt.getvalues("身份证姓名2")
--  作者：有点蓝
--  发布时间：2022/1/6 20:39:00
--  
没看懂什么意思？
--  作者：qazlinle6
--  发布时间：2022/1/6 20:49:00
--  
我这有两列，【身份证姓名】和【身份证姓名2】列
我现在这样弄只显示了身份证姓名列的内容，如果身份证姓名2的列，身份证姓名没有就不会显示
身份证姓名      身份证姓名2       我要显示       原来显示
1                   2                         1                1
2                   1                         2                2
1                   3                         3

[此贴子已经被作者于2022/1/6 20:51:03编辑过]
--  作者：有点蓝
--  发布时间：2022/1/6 21:01:00
--  
dim lst as list(of string) = dt.getvalues("身份证姓名")
For Each a As String In dt.getvalues("身份证姓名2")
if lst.contains(a) = false then lst.add(a)
next

For Each a As String In lst
                Dim aaa01 As Double = dt.compute("sum(提成主销业绩)","身份证姓名=\'" & a  & "\' " )
……
--  作者：qazlinle6
--  发布时间：2022/1/6 23:00:00
--  
a是空白的不显示
--  作者：有点蓝
--  发布时间：2022/1/7 8:31:00
--  
dim lst as list(of string) = dt.getvalues("身份证姓名"，“身份证姓名 is not null”)
For Each a As String In dt.getvalues("身份证姓名2"，“身份证姓名2 is not null”)
--  作者：qazlinle6
--  发布时间：2022/1/7 17:01:00
--  
 Dim dt As DataTable = cmd.ExecuteReader    
        With wb.AddArticle("","a2")
Dim lst As List(of String) = dt.getvalues("身份证姓名","身份证姓名 is not null")
For Each a As String In dt.getvalues("身份证姓名2","身份证姓名2 is not null")
If lst.contains(a) = False Then lst.add(a)
Next
For Each a As String In lst




 .AddTitle("btn1","<a href=""本月品名业绩.htm?年=\'& dt(\'年\')""><



读不到年
--  作者：有点蓝
--  发布时间：2022/1/7 17:16:00
--  
年从哪来的？
--  作者：qazlinle6
--  发布时间：2022/1/7 17:18:00
--  
 Dim dt As DataTable = cmd.ExecuteReader   这个里面
--  作者：有点蓝
--  发布时间：2022/1/7 17:30:00
--  
这是一个表格，取哪一行哪一列的数据？