Foxtable(狐表)用户栏目专家坐堂 → Word报表保存为pdf文件,出现奇怪的字符,该怎样解决


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

主题:Word报表保存为pdf文件,出现奇怪的字符,该怎样解决

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


加好友 发短信
等级:幼狐 帖子:155 积分:1702 威望:0 精华:0 注册:2015/4/7 23:01:00
Word报表保存为pdf文件,出现奇怪的字符,该怎样解决  发帖心情 Post By:2017/5/16 9:52:00 [只看该作者]

直接保存为Word,每行前有一个像空格的字符。直接保存为PDF,出现奇怪的字符。请教怎样解决这个奇怪的字符?谢谢。

 

代码如下:

 

Dim wrt As New WordReport(Tables("文件审批"),ProjectPath & "Attachments\Template\T_文件审批.docx",dlg.FileName)

wrt.RecordsOnEachPage = 1 '指定每页打印的记录数
wrt.Build() '逐行生成报表
wrt.SaveToPDF(dlg.FileName.Replace(".docx",".pdf")) '保存为PDF文件
wrt.Quit() '退出报表


图片点击可在新窗口打开查看此主题相关图片如下:截图00.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:截图01.png
图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110601 积分:562907 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/16 10:01:00 [只看该作者]

word模板上传看看

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


加好友 发短信
等级:幼狐 帖子:155 积分:1702 威望:0 精华:0 注册:2015/4/7 23:01:00
  发帖心情 Post By:2017/5/16 10:05:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:t_文件审批.zip


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/16 10:25:00 [只看该作者]

 帮助的方法有问题,换一种方法。

 

Dim wrt As New WordReport(Tables("表A"),ProjectPath & "Attachments\T_文件审批.docx","g:\test.docx")

wrt.RecordsOnEachPage = 1 '指定每页打印的记录数
wrt.Build() '逐行生成报表
wrt.Quit() '退出报表
Dim app As New MSWord.Application
try
    Dim fileName = "g:\test.docx"
    Dim doc = app.Documents.Open(fileName)
    app.Documents(fileName).ExportAsFixedFormat("g:\test.pdf", MSWord.WdExportFormat.wdExportFormatPDF)
    app.Quit
catch ex As exception
    msgbox(ex.message)
    app.Quit
End try


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


加好友 发短信
等级:幼狐 帖子:155 积分:1702 威望:0 精华:0 注册:2015/4/7 23:01:00
  发帖心情 Post By:2017/5/16 10:38:00 [只看该作者]

好,多谢!

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


加好友 发短信
等级:婴狐 帖子:24 积分:186 威望:0 精华:0 注册:2017/5/16 6:32:00
  发帖心情 Post By:2017/5/31 5:52:00 [只看该作者]

学习

 回到顶部