Foxtable(狐表)用户栏目专家坐堂 → [求助]如何一次性生成多个word文档


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

主题:[求助]如何一次性生成多个word文档

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


加好友 发短信
等级:童狐 帖子:242 积分:2417 威望:0 精华:0 注册:2011/6/19 0:05:00
[求助]如何一次性生成多个word文档  发帖心情 Post By:2017/9/5 17:14:00 [显示全部帖子]

1、需求
选择多行记录(例如全部),执行命令:专业报表-批量输出单个WORD报表,能
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:批量输出多个报表文件.rar

例如生成的文件为
1广州.docx
2佛山.docx
……

2、现状
2.1 代码
打印输出-专业报表-报表管理-批量输出单个WORD报表
代码:
Dim tm As String  = ProjectPath & "Attachments\地市.docx" '指定模板文件
Dim fl As String = ProjectPath & "Reports\" & Tables("信息").current("序号") & Tables("信息").current("区域") & ".docx" '指定目标文件
Dim wrt As New WordReport(Tables("信息"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Show() '显示报表
2.2生成结果
只能一次生成一个文件。

3、解决办法
请问如何处理



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


加好友 发短信
等级:童狐 帖子:242 积分:2417 威望:0 精华:0 注册:2011/6/19 0:05:00
  发帖心情 Post By:2017/9/5 18:48:00 [显示全部帖子]

实现要求,谢谢。

 回到顶部