- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助] (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88172)
-- 发布时间：2016/7/28 11:02:00
-- [求助]
Dim tm As String = ProjectPath & "Attachments\\文件处理签.doc" \'指定模板文件
Dim fl As String = ProjectPath & "Reports\\文件处理签.doc" \'指定目标文件
Dim wrt As New WordReport(Tables("swdj"),tm,fl) \'定义一个WordReport
wrt.Build() \'逐行生成报表
\'wrt.show
\'wrt.Preview()
wrt.Print()
wrt.quit
-- 发布时间：2016/7/28 11:03:00
--
为何点击打印提示已打开？并且软件再无法操作
-- 发布时间：2016/7/28 11:04:00
--
此主题相关图片如下：qq图片20160728110332.png
-- 发布时间：2016/7/28 11:05:00
--
需要耐心等待，因为你是针对所有的行生成报表的。
-- 发布时间：2016/7/28 11:05:00
--
是与ＯＦＦＩＣＥ版本有冲突吗？
-- 发布时间：2016/7/28 11:06:00
--
3楼的提示是因为之前没有正常关闭造成，你可以重启电脑，或在任务管理器中结束word进程
-- 发布时间：2016/7/28 11:07:00
--
我只针对当前行生成报表，难道代码有错？
-- 发布时间：2016/7/28 11:09:00
--
这是针对所有行的：
wrt.Build() \'逐行生成报表
参考：
http://www.foxtable.com/webhelp/scr/2890.htm
单行是Buildone
-- 发布时间：2016/7/28 11:10:00
--
BuildOne才是指定行，http://www.foxtable.com/webhelp/scr/2890.htm
-- 发布时间：2016/7/28 12:34:00
--
可能是因为ＷＰＳ软件与之冲突