Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

HELP HELP MAILING LABELS

Status
Not open for further replies.

Rjconrep

Technical User
Oct 24, 2000
66
US
I have been working on this Mailing label report for over a week. If I don't get it soon they are going to think that I am a total and complete loser.

- Shipping needs to be able to query a data file and then create a mailing label with the results of that query.
- They will need to produce multiple labels from the one record.
- They also want the label number on the mailing label. Ex: label 1 of 5

I have the queries set up, I also have the mailing label set up but the multiple labels and the label number I just can't seem to get.
 
Include a column in your table called LableCount. Populate it as you see fit. Include a bound text column called txtLabel in your report and set it's reord source to LableCount. Add an unbound text box (it can be hidden if you like) and name it txtLabel. Cut and paste this code in the Detail_Print event:

Code:
Private Sub Detail_Print( _
 Cancel As Integer, PrintCount As Integer)
    txtLabel = PrintCount & " of "
    If txtLabelCount = 0 Then
        Me.NextRecord = True
        Me.MoveLayout = False
        Me.PrintSection = False
    Else
        If PrintCount < txtLabelCount Then
            Me.NextRecord = False
        End If
    End If
End Sub
Tyrone Lumley
augerinn@gte.net
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top