以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]远程图片如何取用?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=70313)

--  作者:新福星
--  发布时间:2015/6/18 17:31:00
--  [求助]远程图片如何取用?
一个表中一列是照片列。要将这张照片写入到Excel表格指定单元中。发现直接引用无法读取,在这列中存放的图片地址是远程服务器的地址,如何实现在本在读取远程图片呢?谢谢
--  作者:大红袍
--  发布时间:2015/6/18 17:33:00
--  

 excel报表?

 

 生成报表之前,先把图片下载到本地才可以。

 

 http://www.foxtable.com/help/topics/1402.htm

 


--  作者:Bin
--  发布时间:2015/6/18 17:40:00
--  
如果你用的是2014最新版本.直接就可以引用.
--  作者:新福星
--  发布时间:2015/6/18 17:41:00
--  
直接到RemoteFiles目录取用可否?
--  作者:大红袍
--  发布时间:2015/6/18 17:42:00
--  
以下是引用Bin在2015/6/18 17:40:00的发言:
如果你用的是2014最新版本.直接就可以引用.

 

 


--  作者:新福星
--  发布时间:2015/6/18 17:55:00
--  
我就是最新版本,直接引用不可以!

Dim tpdz As String=qry("图片")
tpdz=tpdz.Replace("/系统资料","RemoteFiles")
\'tpdz=tpdz.Replace("\\","/")
tpdz=  ProjectPath & tpdz

MessageBox.Show(tpdz)
Dim Book As New XLS.Book(wjm)
Dim Sheet As XLS.Sheet = Book.Sheets("封面")
\'Sheet(5,1).Value = New XLS.Picture(GetImage(qry("图片")),10,10,450,300)

Sheet(5,1).Value = New XLS.Picture(GetImage(tpdz),10,10,450,300)

RemoteFiles这个目录就可以了!问题出在哪?谢谢

--  作者:Bin
--  发布时间:2015/6/18 17:56:00
--  
呵呵,你这样取必须得下载回来才可以.

如果你用的是模版,就可以直接引用

--  作者:新福星
--  发布时间:2015/6/18 17:58:00
--  
明白了 谢谢Bin和大红袍图片点击可在新窗口打开查看