- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- word报表套打有问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71051)
-- 发布时间：2015/7/3 18:06:00
-- word报表套打有问题
用word2013做的模板，套打的时候，分段的文字内容，会自动在第二段多个 口 字，怎么回事？请教解决办法。。。。
此主题相关图片如下：套打不准确.png
如图。。
[此贴子已经被作者于2015/7/3 18:18:25编辑过]
-- 发布时间：2015/7/3 18:08:00
--
做个例子发上来测试下。
-- 发布时间：2015/7/3 18:20:00
--
这个是附件
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:收文呈批表.rar |
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.foxdb |
[此贴子已经被作者于2015/7/3 18:21:25编辑过]
-- 发布时间：2015/7/5 14:50:00
--
顶下，请教大家！
-- 发布时间：2015/7/5 15:59:00
--
Dim tm As String = ProjectPath & "Attachments\\收文呈批表.doc" \'指定模板文件
Dim fl As String = ProjectPath & "Reports\\收文呈批表.doc" \'指定目标文件
Dim wrt As New WordReport(Tables("收文"),tm,fl) \'定义一个WordReport
For i As Integer = Tables("收文").TopPosition To Tables("收文").BottomPosition
wrt.ReplaceOne("[拟办意见]", Tables("收文").rows(i)("拟办意见").replace(chr(10), ""))
wrt.BuildOne(Tables("收文").rows(i))
Next
wrt.Show() \'显示报表