Foxtable(狐表)用户栏目专家坐堂 → word报表套打有问题


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

主题:word报表套打有问题

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


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
word报表套打有问题  发帖心情 Post By:2015/7/3 18:06:00 [只看该作者]

用word2013做的模板,套打的时候,分段的文字内容,会自动在第二段多个 口 字,怎么回事?请教解决办法。。。。

图片点击可在新窗口打开查看此主题相关图片如下:套打不准确.png
图片点击可在新窗口打开查看

如图。。



[此贴子已经被作者于2015/7/3 18:18:25编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/3 18:08:00 [只看该作者]

做个例子发上来测试下。

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


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
  发帖心情 Post By:2015/7/3 18:20:00 [只看该作者]

这个是附件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:收文呈批表.rar

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb

[此贴子已经被作者于2015/7/3 18:21:25编辑过]

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


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
  发帖心情 Post By:2015/7/5 14:50:00 [只看该作者]

顶下,请教大家!

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By: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() '显示报表

 回到顶部