- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]如何实现最新记录的选取并生成表 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47859)
-- 发布时间：2014/3/18 17:21:00
-- [求助]如何实现最新记录的选取并生成表
此主题相关图片如下：qq截图20140318171812.png
表a表b是基础数据通过查询或者是其他的方法得到最终表 。要求就是相同编号下的最后一条记录。并且还要输出excel报表。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.rar |
谢谢
-- 发布时间：2014/3/18 17:38:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2014/3/18 22:57:00
--
求教如何表a表b生成表c。只要同一编号的最新数据。 导出什么的都好说
-- 发布时间：2014/3/18 22:57:00
--
求教如何表a表b生成表c。只要同一编号的最新数据。 导出什么的都好说 |
-- 发布时间：2014/3/18 23:27:00
--
在“要得到的表”中的DataColChanged设置以下代码试试：
Dim dr As DataRow = e.DataRow
If e.DataCol.Name = "第一列"
Dim dr1 As DataRow = DataTables("表A").Find("第一列=\'" & dr("第一列") & "\'","第二列 Desc")
Dim dr2 As DataRow = DataTables("表B").Find("第一列=\'" & dr("第一列") & "\'")
If dr1 IsNot Nothing
dr("最新进度") = dr1("第三列")
End If
If dr2 IsNot Nothing
dr("第二列") = dr2("第二列")
End If
End If
-- 发布时间：2014/3/19 8:34:00
--
你没有认真看例子吧.不是生成了一个表C么.
-- 发布时间：2014/3/19 9:02:00
--
看到了 谢谢
-- 发布时间：2014/3/19 17:09:00
--
怎么能够在其他地方用 不光是datacolchangged 比如在一个按钮点击后执行？？
-- 发布时间：2014/3/19 17:13:00
--
原来的不用改，做个按钮，按钮代码：
DataTables("要得到的表").Datacols("第一列").RaiseDataColChanged()
-- 发布时间：2014/3/19 17:13:00
--
例子生成的查询表,什么都不用点.