Foxtable(狐表)用户栏目专家坐堂 → 如何把一天的巡视写在一行内


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

主题:如何把一天的巡视写在一行内

美女呀,离线,留言给我吧!
34772849
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:69 积分:752 威望:0 精华:0 注册:2012/2/6 19:10:00
如何把一天的巡视写在一行内  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/27 15:58:00 [只看该作者]

 例子发上来。

 回到顶部
帅哥哟,离线,有人找我吗?
yan2006l
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:431 积分:3214 威望:0 精华:2 注册:2011/9/10 21:35:00
  发帖心情 Post By:2014/8/27 16:05:00 [只看该作者]

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

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


 回到顶部