Foxtable(狐表)用户栏目专家坐堂 → [求助] 批量打印报表


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

主题:[求助] 批量打印报表

帅哥哟,离线,有人找我吗?
mikee
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:89 积分:947 威望:0 精华:0 注册:2017/8/7 14:36:00
[求助] 批量打印报表  发帖心情 Post By:2018/7/10 13:52:00 [显示全部帖子]

请教如果根据表中选择的数据(一行或者多行),按设计的报表模板批量打印? 

Dim tm As String  = ProjectPath & "Attachments\订单清单.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\订单清单.doc" '指定目标文件
Dim wrt As New WordReport(Tables("订单"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Print()

 回到顶部