Foxtable(狐表) → 用户栏目 → 专家坐堂 → identify


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

主题：identify
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

        Dim ddr125 As DataRow= DataTables("统计表1").Find("身份证姓名='"& a &"' " )


            .AddTitle("btn1","<button  style='width:100%;border-radius:5px 5px 5px 5px; border: 1px solid #cccbcb;margin: 5px 0;background-color: #ffffff;'><p style='border-style: none none solid none;font-size: 18px; color: #0000CD; margin: 10px 0; '>"& a  & " "& pr员工资料("AB组") &" "& ddr125("_identify") &" <p style='border-style: none solid none none;margin: 0px;width:33.3%;float:left; margin: 5px 0;'><a style='color:#afaeae;'>主销业绩</a><br>"& aaa01 & " </p> <p style='border-style: none solid none none;margin: 0px;width:33.3%;float: left;margin: 5px 0;'><a style='color:#afaeae;'>副销业绩</a> <br>"& aaa02 & " </p><p style='border-style: none none none none;margin: 0px;width:33.3%;float:right;margin: 5px 0;'><a style='color:#afaeae;'>合计业绩</a><br>"& aaa01+aaa02 & "</p></button >")



"& ddr125("_identify") &"
这样是不是用不了
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

我想取ddr125identify 行的序号

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


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


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


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


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

那我这个对应名字取行号什么取

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


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

dt = cmd.ExecuteReader()
'对临时进行分组统计
Dim b As New GroupTableBuilder("统计表1",dt)
b.Groups.AddDef("身份证姓名") '根据产品分组
b.Totals.AddDef("提成主销业绩") '对数量进行统计
b.Build'生成统计表
DataTables("统计表1").DataCols.Add("行号", Gettype(Double))
Tables("统计表1").Sort = "提成主销业绩 DESC"

For Each r As Row In Tables("统计表1").Rows
    r("行号") = r.index+1
Next



我这样弄什么有点卡，可以优化下不
[此贴子已经被作者于2022/1/10 22:29:48编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

可以帮我弄一下不，看不懂

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


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

那什么读取主健

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


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

销售合计 where 日期 = '"& Date.Today & "' And   业绩店名 = '"& e.GetValues("a") & "' "
        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

                Dim aaa01 As Double = dt.compute("sum(提成主销业绩)","身份证姓名='" & a  & "' " )
                Dim aaa02 As Double = dt.compute("sum(提成副销业绩)","身份证姓名2='" & a  & "' " )

a("_identify")  用不了

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


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

销售合计 where 日期 = '"& Date.Today & "' And   业绩店名 = '"& e.GetValues("a") & "' "
        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

                Dim aaa01 As Double = dt.compute("sum(提成主销业绩)","身份证姓名='" & a  & "' " )
                Dim aaa02 As Double = dt.compute("sum(提成副销业绩)","身份证姓名2='" & a  & "' " )


可不可以排序，然后显示排名
显示2排名1
      5排名2
     1排名3
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

可不可以帮我弄一下，我弄了两天没弄好

 回到顶部
总数 24 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06006 秒, 5 次数据查询