Office中国论坛/Access中国论坛

标题: 请问如何记录报表被打印的次数？ [打印本页]

作者: yanwei82123300 时间: 2012-6-20 13:57
标题: 请问如何记录报表被打印的次数？
我想依据窗体参数来打印报表，如何防止重复打印，因此想记录打印次数来防止重复打印
请问如何做？

作者: Henry D. Sy 时间: 2012-6-20 14:32
建议在表中增加一字段来保存打印的次数

作者: Henry D. Sy 时间: 2012-6-20 14:51
给你个思路，自己完善

Private Sub Command5_Click()
Dim stDocName As String
Dim strSQL As String
Dim lngTimes As Long
If IsNull(Me.OrderID) Then Exit Sub
lngTimes = Me.打印次数 + 1
stDocName = "rptOrders"
DoCmd.OpenReport stDocName, acViewPreview 'acViewNormal
strSQL = "update Orders set PrinTimes=" & lngTimes & " where [orderid]=" & Me.OrderID
CurrentDb.Execute strSQL
Call OrderID_AfterUpdate
End Sub

复制代码

[attach]49432[/attach]

作者: yanwei82123300 时间: 2012-6-20 15:43
谢谢老师帮助！我想我已经明白了{:soso_e100:}

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)