ACCESS FEED: [MS_AccessPros] Re: How to know if a report has printed

Senin, 19 September 2011

[MS_AccessPros] Re: How to know if a report has printed

George,

I know it's a workflow issue, I was just trying to see if there was a way to idiot-proof it.

Thanks.

--- In MS_Access_Professionals@yahoogroups.com, George <george_hepworth@...> wrote:
>
> This sounds more to me like a workflow problem than a database problem. As
> you say, you can't use code in the database to overcome human, hrm, let's
> call it "frailty". As long as they insist on a method that inherently
> includes the risk of problems, they'll be exposed to that risk. In this
> case, you can't give the users what they want and still maintain control
> over the process. I think a long talk with the users would be my next step.
>
>
>
> George
>
>
>
> From: MS_Access_Professionals@yahoogroups.com
> [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of AdamF
> Sent: Monday, September 19, 2011 1:43 PM
> To: MS_Access_Professionals@yahoogroups.com
> Subject: [MS_AccessPros] Re: How to know if a report has printed
>
>
>
>
>
> Duane,
>
> Where would I put this code? There is no "OnPrint" for reports.
>
> The way it's done now, the report is brought up in Preview mode so they can
> review the labels before printing (that's how they want it now). Then they
> print from there (using Ctrl-P or the printer icon). There's nothing in the
> system that would prevent them from printing repeated times from the Preview
> mode until they close the report. Once closed, they can't bring up those
> labels again.
>
> Adam
>
> --- In MS_Access_Professionals@yahoogroups.com
> <mailto:MS_Access_Professionals%40yahoogroups.com> , Duane Hookom
> <duanehookom@> wrote:
> >
> >
> > I generally recommend prompting the user with a msgbox following the
> printing like:
> >
> > If msgBox("Did these labels successfully
> print?",vbYesNo+vbQuestion,"Labels Printed") = vbYes then
> > currentdb.Execute "UPDATE ... ", dbFailOnError
> > End If
> >
> > FredG posted something a number of years ago that might work. You would
> need to replace the MsgBox with some type of update query.
> >
> > Option Compare Database
> > Option Explicit
> > Dim intPreview As Integer
> >
> > Private Sub Report_Activate()
> > intPreview = -1 ' If [Pages] is not used
> > ' intPreview = -2 ' If [Pages] used
> > End Sub
> >
> > Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer)
> > If intPreview >= 0 Then ' If [Pages] not used
> > ' If intPreview >= 1 Then ' If [Pages] used
> > MsgBox "Gone Printing"
> > End If
> > intPreview = intPreview + 1
> > End Sub
> >
> > Duane Hookom
> >
> >
> >
> >
> > To: MS_Access_Professionals@yahoogroups.com
> <mailto:MS_Access_Professionals%40yahoogroups.com>
> > From: runuphillracing@
> > Date: Mon, 19 Sep 2011 19:49:50 +0000
> > Subject: [MS_AccessPros] Re: How to know if a report has printed
> >
> >
> >
> >
> >
> >
> > No.
> >
> > Adam
> >
> > --- In MS_Access_Professionals@yahoogroups.com
> <mailto:MS_Access_Professionals%40yahoogroups.com> , "luvmymelody"
> <luvmymelody@> wrote:
> > >
> > >
> > > Adam
> > >
> > > Did you ever find the solution to your question?
> > >
> > > Jim Wagner
> > >
> > >
> > > --- In MS_Access_Professionals@yahoogroups.com
> <mailto:MS_Access_Professionals%40yahoogroups.com> , "AdamF"
> <runuphillracing@> wrote:
> > > >
> > > > Is there a way to mark a report when it prints (at least when sent to
> a printer rather than just preview) so that it doesn't get reprinted?
> > > >
> > > > Printing bar code labels. Each label has a unique number, so I don't
> want them to print it twice. I know I can mark it in the code I use to print
> the labels if it were printed directly from that code. However, they want it
> to display in preview mode, then to print from there.
> > > >
> > > > Adam
> > > > Denver, CO
> > > >
> > >
> >
> >
> >
> >
> >
> >
> > [Non-text portions of this message have been removed]
> >
>
>
>
>
>
> [Non-text portions of this message have been removed]
>