Foxtable(狐表)用户栏目专家坐堂 → 再问 word转pdf


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

主题:再问 word转pdf

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


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
再问 word转pdf  发帖心情 Post By:2022/7/19 15:34:00 [只看该作者]

服务端当前代码如下:
Public Sub form360_word_Ajax(rq as Request) 
Dim cmd As SQLCommand =“”
Dim time As String =Format(Date.now,"yyyyMMddHHmmss") 
Dim tm As String  = ProjectPath & "Attachments\证.1doc" '指定模板文件
Dim f1 As String = ProjectPath & "Reports\证1"& e.Values("创建人") & e.Values("guid") & time &".doc" '指定目标文件
Dim f2 As String = ProjectPath & "Reports\证1"& e.Values("创建人") & e.Values("guid") & time &".pdf" '指定目标PDF文件
Dim wrt As New WordReport(tm,f1)
wrt.AddDataTable("证1","主数据源","Sele ct * fro m {证1} where guid = '" & e.Values("guid") & "' ")
wrt.Build() 
wrt.SaveToPDF(f2) '保存为PDF文件
wrt.Quit() '退出
e.WriteString("\Reports\数据查询通知书"& e.Values("创建人") & e.Values("guid") & time &".pdf")
End Sub
在服务端写上该代码,然后在web页面段执行form360_word.Ajax
偶尔会出现文件被某个用户锁定编辑,或文件需要另存为。偶尔又会被正常生成pdf文件    

老师们有没有更好的解决办法呢?
确保在也页面端运行的时候,服务器端不管怎样  都按照模板文件对应将文件转成pdf并显示在页面端

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


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/19 15:38:00 [只看该作者]

改为使用专业报表:http://www.foxtable.com/mobilehelp/topics/0290.htm

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


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
回复:(有点蓝)改为使用专业报表:http://www.foxta...  发帖心情 Post By:2022/7/19 18:19:00 [只看该作者]

那word模板有没有办法直接快速转成专业报表呢?主要是模板太多  一个个的专业报表来弄  费时!但是又不便于用excel!

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


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/19 20:15:00 [只看该作者]

目前没有办法转换

 回到顶部