- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]如何统计打印次数？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177150)
-- 发布时间：2022/5/11 8:59:00
-- [求助]如何统计打印次数？
如何统计用户真实打印了多少次，就是打成纸质文件，不是预览次数
-- 发布时间：2022/5/11 9:39:00
--
自己写代码打印才可以统计，比如
Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls")
Dim fl As String = ProjectPath & "Reports\\出库单.xls"
Book.Build() \'生成细节区
Book.Sheets(0).Rows.RemoveAt(0) \'删除第一行,Excel报表的第一行通常是标记行
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Verb = "Print" \'指定动作
Proc.Start()
Dim fl As String = ProjectPath & "Reports\\出库单.xls"
Book.Build() \'生成细节区
Book.Sheets(0).Rows.RemoveAt(0) \'删除第一行,Excel报表的第一行通常是标记行
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Verb = "Print" \'指定动作
Proc.Start()
tables("打印次数表").current("次数") = tables("打印次数表").current("次数")+1
-- 发布时间：2022/5/11 16:29:00
--
好的，谢谢
-- 发布时间：2022/11/18 16:21:00
--
这样可以记录打印的表名和次数吗？我刚试了只记录打印次数没记录表名
-- 发布时间：2022/11/18 16:28:00
--
以下是引用denghui69986在2022/11/18 16:21:00的发言：
这样可以记录打印的表名和次数吗？我刚试了只记录打印次数没记录表名
代码是自己写的，想纪录什么就自己加呗这样可以记录打印的表名和次数吗？我刚试了只记录打印次数没记录表名
tables("打印次数表").current("次数") = tables("打印次数表").current("次数")+1
tables("打印次数表").current("表名") = "出库单"