[求助]execl 报表引出图片列有的没引出来 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]execl 报表引出图片列有的没引出来

共有1765人关注过本帖树形打印复制链接主题：[求助]execl 报表引出图片列有的没引出来

whyxd

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：204 积分：1904 威望：0 精华：0 注册：2016/2/17 12:11:00

[求助]execl 报表引出图片列有的没引出来 发帖心情

Post By：2017/8/2 19:32:00 [显示全部帖子]

生成excel报表代码：

With Tables("窗口a_table5")

If .Cols(0).Name <> "第一列" Then

Dim Book As New XLS.Book(ProjectPath & "Attachments\单据.xls")

Dim fl As String = ProjectPath & "Reports\单据.xls"

Book.Build() '生成细节区

Book.Save(fl) '保存工作簿

Dim Proc As New Process '打开工作簿

Proc.File = fl

Proc.Start()

End If

End With

此主题相关图片如下：图片.png

此主题相关图片如下：excel模板.png

whyxd

小大 2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：204 积分：1904 威望：0 精华：0 注册：2016/2/17 12:11:00

回复：（有点甜）模板没有问题，做个例子发上来测试 发帖心情

Post By：2017/8/3 12:01:00 [显示全部帖子]

用开发版做的例子行不，我这电脑商业版的已经提示注册了，用不了了。

whyxd

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：204 积分：1904 威望：0 精华：0 注册：2016/2/17 12:11:00

回复：（有点甜）以下是引用whyxd在2017/8/3 12:01:00... 发帖心情

Post By：2017/8/6 8:47:00 [显示全部帖子]

。。。我才知道我的加密狗还可以用在商业版上。。。

我做例子的时候发现问题所在了，我实际上引出的是sql语句加载的窗口表，而这表的图片如果在Attachments文件夹下存在的话可以引出，如果Attachments文件夹下没有就引不出来。而在原本的数据表中只要列属性-扩展属性-存放目录设置对了，excel报表就可以引出局域网共享文件夹中的图片。

这个需要怎么解决？？

[此贴子已经被作者于2017/8/6 8:52:40编辑过]

whyxd

小大 4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：204 积分：1904 威望：0 精华：0 注册：2016/2/17 12:11:00

回复：（有点甜）用代码设置你窗口表对应列的存... 发帖心情

Post By：2017/8/6 11:28:00 [显示全部帖子]

测试成功，多谢指教

下一主题 >> << 上一主题

主题：[求助]execl 报表引出图片列有的没引出来