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


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

主题：合计
帅哥，在线噢！
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/28 16:13:00 [显示全部帖子]

建议把多值字段拆分为多行数据保存，否则很多统计都不好做，而且效率非常低

 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/28 16:40:00 [显示全部帖子]

增加一个子表，不要使用多值字段，放到子表里，一个值一行数据。每个店名每个生日一行数据

 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/28 16:48:00 [显示全部帖子]

类似这种：

店名、用户、生日、      月、   日
A、张三、2020-1-1、    1、   1
A、李四、2020-10-10、10、 10
B、王五、2020-11-1、   1、  1
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/28 17:10:00 [显示全部帖子]

上传实例看看吧，不知道您的业务具体是怎么样的

 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/28 17:39:00 [显示全部帖子]

怎样才算不重复？

 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/28 17:47:00 [显示全部帖子]

Dim nr As dataRow
For Each r3 As Row In Tables("会员资料").Rows
    For Each s As String In r3("生日多列").split(",")
nr =dataTables("会员资料月日明细").find("注册日期='" & r3("注册日期") & "' and 注册店名='" & r3("注册店名") & "' and  ...其它不重复的列自己补全...")
if nr is nothing
        nr = dataTables("会员资料月日明细").AddNew
        nr("注册日期") = r3("注册日期")
        nr("注册店名") = r3("注册店名")
        nr("电话") = r3("电话")
        nr("生日月日") = s
        nr("行数") = r3("行数")
end if
    Next
Next
 回到顶部
帅哥，在线噢！
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/29 20:17:00 [显示全部帖子]

and 电话= '" & r3("电话") & "' and 生日月日= '" & s & "'  ")

 回到顶部
帅哥，在线噢！
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/30 16:12:00 [显示全部帖子]

Select Case e.DataCol.Name
    Case "生日日期","其它节日日期","其它2节日日期","其它日期备注","其它2日期备注"
        Dim nr As DataRow
        Dim r3  As DataRow = e.DataRow
            For Each s As String In r3("生日月日").split(",")
                nr =DataTables("会员资料月日明细").sqlfind("注册日期='" & r3("注册日期") & "' and 注册店名='" & r3("注册店名") & "' and 电话= '" & r3("电话") & "' and 生日月日='" & s & "'  ")
                If nr Is Nothing  Then
                    nr = DataTables("会员资料月日明细").AddNew
                    nr("注册日期") = r3("注册日期")
                    nr("注册店名") = r3("注册店名")
                    nr("电话") = r3("电话")
                    nr("生日月日") = s
                    nr("行数") = r3("行数")
                    nr("注册店名账号") = r3("注册店名账号")
                End If
                    nr("生日日期") = r3("生日日期")
                    nr("其它节日日期") = r3("其它节日日期")
……
            Next
End Select
 回到顶部
帅哥，在线噢！
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/30 16:33:00 [显示全部帖子]

这种多值字段无法判断到底改了什么值。

个人建议：多值字段用来做展示尚可，不适合用来做各种业务关联和处理，非常麻烦，效率低下
 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109496 积分：557148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/11/30 16:38:00 [显示全部帖子]

改为行存储，一行数据一个生日

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