| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 无法提取不重复编号的第一个日期值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=135171) |
| -- 作者：malavazos -- 发布时间：2019/5/19 23:56:00 -- 无法提取不重复编号的第一个日期值 MAF-012-4
2019-06-13 00:00:00 INSP-003-1
2019-06-21 00:00:00 MAF-012-4
2019-10-19 00:00:00 MAF-007-2
2019-08-20 00:00:00 EQUI-002-4
2019-02-04 00:00:00 MAF-016-4
2019-05-17 00:00:00 MAF-006-1
2019-11-13 00:00:00 MAF-022-3
2019-05-07 00:00:00 我要把上述两列中的第一列不重复项提出，并记录器最早的一个日期，形成一个新表。做了很长时间也为成功。下面是我的代码，请老师指点！（第一列值得到了，未得到第二列时间，得到的仅仅是00：00：00；无法得到日期） 我的日期类型定义位 Gettype（date） For Each dd As String In DataTables("当前年度维护计划").GetValues("任务编号") Dim dr1 As DataRow = DataTables("统计").AddNew() dr1("任务编号") = dd dr1("计划执行日期") = DataTables("当前年度维护计划").find("任务编号 = \'dd\'","计划执行日期") output.show(dd) output.show(dr1("计划执行日期")) Next MainTable = Tables("统计") |
| -- 作者：malavazos -- 发布时间：2019/5/19 23:58:00 -- 下面是我的全部代码： Dim jb As New SQLJoinTableBuilder("当前年度维护计划","计划维护记录") jb.C jb.AddTable("计划维护记录","任务编号","计划维护任务","任务编号") jb.Filter = "[计划执行日期] >= #1/1/2019# And [计划执行日期]<= #12/31/2019#" jb.AddCols("{计划维护任务}.任务编号","任务名称","设备台数","设备编号","计划执行日期", "{计划维护记录}.周期","{计划维护记录}.id") jb.AddExp("维护台次数","12 / {计划维护记录}.周期 * {计划维护任务}.设备台数") jb.Build() \'MainTable = Tables("当前年度维护计划") Dim dtb As New DataTableBuilder("统计") dtb.AddDef("任务编号", Gettype(String), 32) dtb.AddDef("设备编号", Gettype(String), 100) dtb.AddDef("周期", Gettype(String), 32) dtb.AddDef("计划执行日期", Gettype(Date)) dtb.Build() For Each dd As String In DataTables("当前年度维护计划").GetValues("任务编号") Dim dr1 As DataRow = DataTables("统计").AddNew() dr1("任务编号") = dd dr1("计划执行日期") = DataTables("当前年度维护计划").find("任务编号=\'dd\'","计划执行日期") output.show(dd) output.show(dr1("计划执行日期")) Next MainTable = Tables("统计")
|
| -- 作者：有点蓝 -- 发布时间：2019/5/20 10:09:00 -- 先看看：http://www.foxtable.com/webhelp/scr/1284.htm For Each dd As String In DataTables("当前年度维护计划").GetValues("任务编号") Dim dr1 As DataRow = DataTables("统计").AddNew() dr1("任务编号") = dd dim dr2 as datarow = DataTables("当前年度维护计划").find("任务编号=\'" & dd & "\'","计划执行日期") dr1("计划执行日期") = dr2("计划执行日期") output.show(dd) output.show(dr1("计划执行日期")) Next |
| -- 作者：有点甜 -- 发布时间：2019/5/20 10:53:00 -- 参考
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=134162&skin=0
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=132745&skin=0
|
| -- 作者：malavazos -- 发布时间：2019/5/20 14:12:00 -- 我想对数字列上面增加会总行，如何添加？谢谢 |
| -- 作者：有点甜 -- 发布时间：2019/5/20 15:02:00 -- 设置汇总模式，如
http://www.foxtable.com/webhelp/scr/00144.htm
|