怎么实现时间和凭证号相同条件下的数据uuid全部赋值为一样凭证编号按时间和凭证号相同的前提下从01依次开始编号 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 怎么实现时间和凭证号相同条件下的数据uuid全部赋值为一样凭证编号按时间和凭证号相同的前提下从01依次开始编号

共有3640人关注过本帖树形打印复制链接主题：怎么实现时间和凭证号相同条件下的数据uuid全部赋值为一样凭证编号按时间和凭证号相同的前提下从01依次开始编号

cnsjroom

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

加好友

发短信

等级：七尾狐帖子：1571 积分：11238 威望：0 精华：0 注册：2021/1/17 17:06:00

怎么实现时间和凭证号相同条件下的数据uuid全部赋值为一样凭证编号按时间和凭证号相同的前提下从01依次开始编号 发帖心情

Post By：2021/12/6 17:55:00 [只看该作者]

怎么实现凭证号和时间符合条件的行将uuid全部赋值为一样凭证编号从01开始编号谢谢老师

当前代码

Dim Products As List(Of String)

Products = DataTables("凭证明细").GetValues("时间")

Dim Products1 As List(Of String)

For Each Product As String In Products

Products1 = DataTables("凭证明细").GetValues("凭证号","时间='"& Product &"'")

For Each Product1 As String In Products1

Dim a1 As DataRow=DataTables("凭证明细").Find("时间='" & Product & "'and 凭证号='" & Product1 & "'")

Dim a2 As DataRow=DataTables("凭证号").Find("时间='" & Product & "'and 凭证号='" & Product1 & "'")

If a1 IsNot Nothing Then

a1("uuid")=a2("uuid")

End If

当前代码运行如下：

nxhylczh

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

加好友

发短信

等级：小狐帖子：335 积分：2674 威望：0 精华：0 注册：2018/11/22 9:19:00

Post By：2021/12/6 19:34:00 [只看该作者]

dim Ft as string ="时间>=#2015-01-01# and 时间<= #2015-01-31#"

dim VoucherNo as int.. = DataTables("凭证明细").compute("Max(凭证编号）“，Ft）+1

有点蓝

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

加好友

发短信

等级：超级版主帖子：110779 积分：563827 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/6 20:36:00 [只看该作者]

For Each Product As String() In DataTables("凭证明细").GetValues("时间|凭证号")

Dim a2 As DataRow=DataTables("凭证号").Find("时间='" & Product(0) & "'and 凭证号='" & Product(1) & "'")

If a2 IsNot Nothing Then

dim idx as integer = 1

For Each dr as datarow in DataTables("凭证明细").select("时间='" & Product(0) & "' and 凭证号='" & Product(1) & "'")

dr("uuid")=a2("uuid")

dr("凭证遍号")=idx

idx += 1

End If

cnsjroom

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

加好友

发短信

等级：七尾狐帖子：1571 积分：11238 威望：0 精华：0 注册：2021/1/17 17:06:00

回复：（有点蓝）For Each Product As String() In&nb... 发帖心情

Post By：2021/12/7 0:16:00 [只看该作者]

谢谢老师耐心指导

cnsjroom

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

加好友

发短信

等级：七尾狐帖子：1571 积分：11238 威望：0 精华：0 注册：2021/1/17 17:06:00

回复：（nxhylczh）dim Ft as string ="时间>=#201... 发帖心情

Post By：2021/12/7 0:16:00 [只看该作者]

谢谢分享思路

下一主题 >> << 上一主题

主题：怎么实现时间和凭证号相同条件下的数据uuid全部赋值为一样 凭证编号按时间和凭证号相同的前提下 从01依次开始编号

主题：怎么实现时间和凭证号相同条件下的数据uuid全部赋值为一样凭证编号按时间和凭证号相同的前提下从01依次开始编号