以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 关于窗口按钮控件点击后自动连接打印报表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=183951) |
-- 作者:divil -- 发布时间: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() |
-- 作者:有点蓝 -- 发布时间: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 -- 发布时间:2022/11/20 20:44:00 -- 我刚才将您发过来的代码粘贴后还是出现刚才的问题,麻烦您了。谢谢! 版主,您好! 我刚才将您发过来的代码粘贴后还是出现刚才的问题,麻烦您了。谢谢! |
-- 作者:有点蓝 -- 发布时间:2022/11/20 21:10:00 -- 1、模板路径不对: msgbox(ProjectPath & "Attachments\\材料标签(准直器插针BOM核对表).xls") 2、模板文件不存在 3、模板,或者报表文件处于打开状态 |
-- 作者:divil -- 发布时间: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() |
-- 作者:有点蓝 -- 发布时间:2022/11/20 22:13:00 -- 打开电脑资源管理器,看看模板文件真正的路径,直接复制 |