printing tickets

[Puso]

Does anyone know how to trigger a report to print as many times as a value in a textbox.
I would need to use this in a ticketing system.

eg. a group buys 8 tickets, i create one line item and change the quantity field to 8, i then need to click on a button to print 8 tickets.

please bear in mind that i am using Access2 and it does not have a lot of features as the later versions.
Any help or advice would be appreciated.

 

[g28dman]

Since I am pretty new myself, someone may correct me. But, I think you can create a Macro that will printout "x" number for copies and attach that macro to the button your using to print.

 

[Enviva]

You could set up a string variable to indicate how many copies, then insert that variable into the Docmd.Printout command

Use the Printout Method of the Docmd object.

DoCmd.PrintOut [printrange][, pagefrom, pageto] _
[, printquality][, copies][, collatecopies]

For example, if I want to print out two copies of the first page of a report, I would use
DoCmd.OpenReport "rptCustomers", acViewPreview
DoCmd.PrintOut acPages, 1, 1, , 2

The following method which does not require the report to be in Preview mode.

DoCmd.SelectObject acReport, "rptCustomers", True
'This prints out two copies of the report
DoCmd.PrintOut , , , , 2

 

[oldaf294]

I did this a few years ago. SHould still work.

Add a table to your database that only has one number field. Populate this table "Number" to contain sequential numbers 1 to whatever the maximum number of labels you would ever print.
Add this table to the query that is the record source for your report. Don't join it.
Add the field that contains the numbers to the query grid and set the criteria for this field to:
Between 1 And [Qty]
Jim

 

[oldaf294]

puso,
The last line.... "Between 1 And [Qty]"
refers to your [quantity field]

 

[Puso]

You could set up a string variable to indicate how many copies, then insert that variable into the Docmd.Printout command

Use the Printout Method of the Docmd object.

DoCmd.PrintOut [printrange][, pagefrom, pageto] _
[, printquality][, copies][, collatecopies]

For example, if I want to print out two copies of the first page of a report, I would use
DoCmd.OpenReport "rptCustomers", acViewPreview
DoCmd.PrintOut acPages, 1, 1, , 2

The following method which does not require the report to be in Preview mode.

DoCmd.SelectObject acReport, "rptCustomers", True
'This prints out two copies of the report
DoCmd.PrintOut , , , , 2

Ive tried this and it doesnt work, it brings up an expressions error
I dont think access2.0 supports this feature.
if yu have any other suggestions please post them