Foxtable(狐表)用户栏目专家坐堂 → [求助]可否实现自动导出报告的功能


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

主题:[求助]可否实现自动导出报告的功能

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


加好友 发短信
等级:婴狐 帖子:13 积分:157 威望:0 精华:0 注册:2019/7/6 10:12:00
[求助]可否实现自动导出报告的功能  发帖心情 Post By:2019/8/31 13:46:00 [只看该作者]

描述:
已经做好一个excel报告的模板,存在项目Attachments文件夹内
之前的做法:点击‘生成报表’生成一个excel报告、将报告另存在本地、将报告增加到表中属性为备注-多文件的列、自动复制到局域网指定路径
由于每一笔记录都需要生成报告、另存、在增加回表中,操作比较麻烦,希望能够用代码实现如下步骤:

1.增加一个导出报告的按钮
2.点击按钮,在局域网指定路径生成一个报告(用做好的报表模板生成,文件名与第一列编号一致)
3.将生成的报告文件名自动填入 ‘检测编号’ 列
4.打开这个文件

请版主大人帮忙看看是否能够实现


图片点击可在新窗口打开查看此主题相关图片如下:图片1-1.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/31 14:11:00 [只看该作者]

1、2、4,参考:http://www.foxtable.com/webhelp/topics/1145.htm

Dim fl As String = ProjectPath & "Reports\" & tables("表A").current("编号") & ".xls"

3、tables("表A").current("检测报告") =  tables("表A").current("编号") & ".xls"


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


加好友 发短信
等级:婴狐 帖子:13 积分:157 威望:0 精华:0 注册:2019/7/6 10:12:00
  发帖心情 Post By:2019/8/31 15:12:00 [只看该作者]

感谢版主,已经实现
我还想在导出之前增加一个判断代码:
如果指定路径中已有与‘编号’相同的文件,则提示‘文件已存在’
否则进行导出

请帮忙

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/31 15:52:00 [只看该作者]


 回到顶部