Foxtable(狐表)用户栏目专家坐堂 → word报表中,如何动态显示图片


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

主题:word报表中,如何动态显示图片

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


加好友 发短信
等级:狐神 帖子:6885 积分:43595 威望:0 精华:0 注册:2009/3/2 14:07:00
word报表中,如何动态显示图片  发帖心情 Post By:2017/8/1 12:16:00 [只看该作者]

如题

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/1 12:24:00 [只看该作者]


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


加好友 发短信
等级:狐神 帖子:6885 积分:43595 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2017/8/1 13:09:00 [只看该作者]

Dim tm As String  = ProjectPath & "Attachments\doc1.docx" '指定模板文件
Dim fl As String = ProjectPath & "Reports\订单.doc" '指定目标文件
Dim wrt As New WordReport(Tables("订单"),tm,fl) '定义一个WordReport
Dim r As Row =Tables("订单").current
wrt.ReplaceWithImage("[图片]",r("图片"))
wrt.BuildOne(r)
wrt.Show() '显示报表


这个代码如何修改?


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





[此贴子已经被作者于2017/8/1 13:12:56编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/1 13:12:00 [只看该作者]

 无法这样做,必须用【实例五】的方式

 

 


 回到顶部