Foxtable(狐表)用户栏目专家坐堂 → [求助]html编辑器图文打印


  共有4107人关注过本帖平板打印复制链接

主题:[求助]html编辑器图文打印

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


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
[求助]html编辑器图文打印  发帖心情 Post By:2019/2/16 21:27:00 [只看该作者]

老师好!
请教如何把HTML编辑器里的图文内容按照原格式,单个或批量预览、打印。
我按照老师以前在论坛里的提示,先做了一个  “原始模板.html”  文件;然后点击窗口按钮,用编辑器的图文代码替换 “原始模板.html”中的特定字符,并另存为“新模板.doc”。
但是,替换后是乱码,指定编码后也没有起作用;另外,编辑器中的图片路径是不是也要改一下?
谢谢!

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


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

按钮代码:
Dim s As String = FileSys.ReadAllText(ProjectPath & "初始模板.html")
Dim r As Row = Tables("通知单").Current
FileSys.WriteAllText(ProjectPath & "新模板.doc",s.Replace("(绑定编号)",r("编号") ).Replace("(绑定html_内容)",r("html_内容")), False)

Dim Proc As New Process '定义一个新的Process
Proc.File = ProjectPath & "新模板.doc" '指定要打开的文件
Proc.Start()

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试html图文打印.rar



 回到顶部
总数 20 1 2 下一页