以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何把一天的巡视写在一行内  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55997)

--  作者:34772849
--  发布时间:2014/8/27 15:53:00
--  如何把一天的巡视写在一行内
用专业报表,我想根据巡视数据表,生成考核表,代码应该怎样修改?代码如下:
rt.Cells(0,2).Text = "[Format(Fields!日期.Value,""MM-dd"")]" 
    rt.Cells(0,3).Text ="[Format(Fields!开始时间.Value,""HH:mm"")]-[Format(Fields!结束时间.Value,""HH:mm"")][Fields!检查地点.Value]"
With rt.RowGroups(0,1)
    .DataBinding.DataSource = BindTables("巡视数据表")
    .DataBinding.Grouping.Expressions.Add("Fields!序号.Value")
End With  

 
[此贴子已经被作者于2014-9-16 8:28:00编辑过]

--  作者:有点甜
--  发布时间:2014/8/27 15:58:00
--  
 例子发上来。
--  作者:yan2006l
--  发布时间:2014/8/27 16:05:00
--  

不要用专业报表,编程生成另外一张临时表,然后把临时表导出

编码也挺简单的,遍历本月1-最后一天;里面再套一个遍历当天所有的selsct,每次aadnew()增加一行直接把数据合成进去