473,569 Members | 2,735 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

Printing Labels

I have a database which will be printing out labels for SMALL test tubes
(1/4" high). We have yet to find a reasonably-priced printer (labelwriter)
which can effectively print this on ROLLS of labels....due to slippage, soon
you have the printout missing the label. So we are thinking that we have to
use sheets of labels.

HOWEVER, one job may need 15 labels, another may need 8, etc.

Does anyone have a solution for how to set this up in Access to minimize
wasting labels on the sheets. If the last job leaves off 1/2 down column
one, how can we tell the printer to start the next job down 1/2 column? Or
is it just best to export the data and manage it through MSWord somehow?

Any suggestions would be appreciated.

Andi

Nov 12 '05 #1
2 2990
On Tue, 20 Jan 2004 17:04:47 -0500, "DBQueen" <ir******@bells outh.net>
wrote:
I have a database which will be printing out labels for SMALL test tubes
(1/4" high). We have yet to find a reasonably-priced printer (labelwriter)
which can effectively print this on ROLLS of labels....due to slippage, soon
you have the printout missing the label. So we are thinking that we have to
use sheets of labels.

HOWEVER, one job may need 15 labels, another may need 8, etc.

Does anyone have a solution for how to set this up in Access to minimize
wasting labels on the sheets. If the last job leaves off 1/2 down column
one, how can we tell the printer to start the next job down 1/2 column? Or
is it just best to export the data and manage it through MSWord somehow?

Any suggestions would be appreciated.

Andi


Andi,
It's not clear from your post whether the label is to be printed in
batches, some 15 of, some 8 of, etc., or whether the label is to be
printed 15 times only.

I'll assume the second scenario. You have one label (or many) to be
printed and the user will input the number of times to repeat them on
the label sheet.
***
This will permit you to enter the number of times to repeat the
labels, as well as skip missing label positions on an already used
sheet.

It is designed to have all the labels in the Report's Recordsource
printed, starting at Page 1, and continuing through each page of
labels until the end.

First make sure your label report properly prints 1 label per record.

Then add a Report Header to the label report.
Add 3 unbound text boxes to the header.
1) Set the Control Source to:
= [Skip how many]
Name this control SkipCounter
2) Leave the second control unbound.
Name this control SkipControl
3) Set the third control's Control Source to:
=[Repeat how many?]
Name it RepeatCounter

Next code the Report Header OnFormat event:

Private Sub ReportHeader_Fo rmat(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
=======
Now code the Detail OnPrint Event:
(Note that intMyPrint is Static!!)

Private Sub Detail_Print(Ca ncel As Integer, PrintCount As Integer)
Static intMyPrint As Integer
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
intMyPrint = 0
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
intMyPrint = intMyPrint + 1
If IsNull([RepeatCounter]) Then
ElseIf intMyPrint Mod [RepeatCounter] = 0 Then
Me.NextRecord = True
intMyPrint = 0
Else
Me.NextRecord = False
End If
End If

End Sub
=========

When you run the report, it will ask how many labels to skip, then how
many times to repeat each label.

Hope this has helped.

--
Fred

Please reply only to this newsgroup.
I do not reply to personal e-mail.
Nov 12 '05 #2
Thank you SO MUCH, Fred. I haven't had a chance to test it, but it looks
like this will do the trick. I was asking just about printing 1 of each
label and making sure that you start with the NEXT label when you start
printing the next batch, but they may want 2 of each label sometimes, so
that's great that you covered it all.

I assume PrintCount counts the items as they prepare to print?

Thanks!

Andi

<fr***@example. invalid> wrote in message
news:2r******** *************** *********@4ax.c om...
On Tue, 20 Jan 2004 17:04:47 -0500, "DBQueen" <ir******@bells outh.net>
wrote:
I have a database which will be printing out labels for SMALL test tubes
(1/4" high). We have yet to find a reasonably-priced printer (labelwriter)which can effectively print this on ROLLS of labels....due to slippage, soonyou have the printout missing the label. So we are thinking that we have touse sheets of labels.

HOWEVER, one job may need 15 labels, another may need 8, etc.

Does anyone have a solution for how to set this up in Access to minimize
wasting labels on the sheets. If the last job leaves off 1/2 down column
one, how can we tell the printer to start the next job down 1/2 column? Oris it just best to export the data and manage it through MSWord somehow?

Any suggestions would be appreciated.

Andi


Andi,
It's not clear from your post whether the label is to be printed in
batches, some 15 of, some 8 of, etc., or whether the label is to be
printed 15 times only.

I'll assume the second scenario. You have one label (or many) to be
printed and the user will input the number of times to repeat them on
the label sheet.
***
This will permit you to enter the number of times to repeat the
labels, as well as skip missing label positions on an already used
sheet.

It is designed to have all the labels in the Report's Recordsource
printed, starting at Page 1, and continuing through each page of
labels until the end.

First make sure your label report properly prints 1 label per record.

Then add a Report Header to the label report.
Add 3 unbound text boxes to the header.
1) Set the Control Source to:
= [Skip how many]
Name this control SkipCounter
2) Leave the second control unbound.
Name this control SkipControl
3) Set the third control's Control Source to:
=[Repeat how many?]
Name it RepeatCounter

Next code the Report Header OnFormat event:

Private Sub ReportHeader_Fo rmat(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
=======
Now code the Detail OnPrint Event:
(Note that intMyPrint is Static!!)

Private Sub Detail_Print(Ca ncel As Integer, PrintCount As Integer)
Static intMyPrint As Integer
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
intMyPrint = 0
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
intMyPrint = intMyPrint + 1
If IsNull([RepeatCounter]) Then
ElseIf intMyPrint Mod [RepeatCounter] = 0 Then
Me.NextRecord = True
intMyPrint = 0
Else
Me.NextRecord = False
End If
End If

End Sub
=========

When you run the report, it will ask how many labels to skip, then how
many times to repeat each label.

Hope this has helped.

--
Fred

Please reply only to this newsgroup.
I do not reply to personal e-mail.

Nov 12 '05 #3

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

2
3442
by: qumpus | last post by:
My program right now generates USPS style shipping label using System.Drawing.Graphics. It works fine except that the printer prints really slowly. I want to make my program take advantage of true type fonts. So I assume it's possible to send Font Type and the text to the printer, and the printer should digest and print faster. Still, barcode...
3
4307
by: Grim Reaper | last post by:
I print mailing labels out of Access 2000 databases about 3 to 4 times a week. I have been having problems with one thing since I have been printing mailing labels. I print mailing labels by using a report I created and then printing them on a continuous-feed dot matrix printer. I used the Label Wizard, chose the query I created, picked the...
4
9206
by: Arif | last post by:
I C# code prints very slow as compared to a third party barcode printing software. That software prints approximately 10 labels in 2 seconds while my C# code prints 10 labels in 5 to 6 seconds. And this differences increases with the increase number of labels. The code is as follwods: Here rdr = OleDbDataReader Font is Times New Roman, 12pt
6
1169
by: Rand | last post by:
Hello anyone, Situation: I want to print 1 or x mailing continuous form labels 1" X 3.5" then change to a different name and print again. Everything works fine except for problem below. Problem: Unwanted form feed after printing.
3
6279
by: Mika M | last post by:
Hi all! I have made an application for printing simple barcode labels using PrintDocument object, and it's working fine. Barcode printer that I use is attached to the computer, and this computer has drivers installed for this printer, and this printer is shared for the network. Question 1:
6
2205
by: MJ | last post by:
Is it possible to print varying numbers of labels from Access?
6
8633
by: Ron | last post by:
Hi, I know Access allows for easy construction of a report setup to print labels from a table/query, etc. I've done that one. It works pretty well for what I need. However, is there an example anywhere that someone can point me to that is more flexible? And, I mean flexible in this regard:
11
2804
by: fieldling | last post by:
I have a query which I view through a form. Due to problems with the label wizard printing to a dot-matrix printer I have some code to print out a single label when a command button is clicked. This works fine. However I would like to print all the records from the query on to consecutive labels. Below is the code for this function but it...
5
2793
by: Ron | last post by:
Hi All, I've got a report that prints mailing labels. It utilizes a routine that asks the number of labels to skip, the number of each label to print, and then prints. It works really well on a print preview. But,when I print to the printer it disregards the number of labels to skip. I preview all the reports I've got and then have a...
0
7694
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main...
0
7921
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. ...
0
8118
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that...
0
7964
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the...
0
6278
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then...
1
5504
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes...
0
3651
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols. I succeeded, with both firewalls in...
0
3636
by: adsilva | last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
0
936
bsmnconsultancy
by: bsmnconsultancy | last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.