Foxtable(狐表)用户栏目专家坐堂 → 关于窗口按钮控件点击后自动连接打印报表


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

主题:关于窗口按钮控件点击后自动连接打印报表

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


加好友 发短信
等级:童狐 帖子:241 积分:2124 威望:0 精华:0 注册:2012/9/23 10:42:00
关于窗口按钮控件点击后自动连接打印报表  发帖心情 Post By:2022/11/20 20:24:00 [只看该作者]

版主,您好!我在窗口设置按钮控件,同时在Click里面粘贴如下函数,但是应用窗口时点击打印报表时无法打印,”打开存储文件失败“,请问如何设置打印标签按钮控件,点击后希望能够打印报表,谢谢!
Dim Book As New XLS.Book(ProjectPath & "Attachments\材料标签(准直器插针BOM核对表).xls")
Book.Build() 
Book.Save(ProjectPath & "Reports\材料标签(准直器插针BOM核对表).xls")
Dim Proc As New Process
Proc.File = "c:\reports\材料标签(准直器插针BOM核对表).xls"
Proc.Start()





图片点击可在新窗口打开查看




图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/20 20:33:00 [只看该作者]

Dim Book As New XLS.Book(ProjectPath & "Attachments\材料标签(准直器插针BOM核对表).xls")
Book.Build() 
Book.Save(ProjectPath & "Reports\材料标签(准直器插针BOM核对表).xls")
Dim Proc As New Process
Proc.File = ProjectPath & "Reports\材料标签(准直器插针BOM核对表).xls"
Proc.Start()

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


加好友 发短信
等级:童狐 帖子:241 积分:2124 威望:0 精华:0 注册:2012/9/23 10:42:00
我刚才将您发过来的代码粘贴后还是出现刚才的问题,麻烦您了。谢谢!  发帖心情 Post By:2022/11/20 20:44:00 [只看该作者]

版主,您好!
我刚才将您发过来的代码粘贴后还是出现刚才的问题,麻烦您了。谢谢!
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/20 21:10:00 [只看该作者]

1、模板路径不对: msgbox(ProjectPath & "Attachments\材料标签(准直器插针BOM核对表).xls")
2、模板文件不存在
3、模板,或者报表文件处于打开状态



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


加好友 发短信
等级:童狐 帖子:241 积分:2124 威望:0 精华:0 注册:2012/9/23 10:42:00
如何在窗口的按钮设置打印报表代码  发帖心情 Post By:2022/11/20 21:56:00 [只看该作者]

版主,您好!
我按照下面代码试了还是不行,报表未打开,报表模版还在。路径估计代码没有写对。

Dim Book As New XLS.Book(F: \ 制造三部管理软件开发版(20221120) \ Attachments \ 材料标签(准直器插针BOM核对表).xls")
Book.Build() 
Book.Save(F:\制造三部管理软件开发版(20221120)\Attachments"Reports \ 材料标签(准直器插针BOM核对表).xls")
Dim Proc As New Process
Proc.File = F:\制造三部管理软件开发版(20221120)\Attachments"Reports \ 材料标签(准直器插针BOM核对表).xls"
Proc.Start()

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/20 22:13:00 [只看该作者]

打开电脑资源管理器,看看模板文件真正的路径,直接复制

 回到顶部