Contact US

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

OLE Active Barcode Control

OLE Active Barcode Control

OLE Active Barcode Control


A form in a database I've been asked to update contains a pick list containing a barcode for the particular order

The barcode data properties in the form say
Control Class : Order ID
OLE Class ; Active Barcode Control
Class : abcd17.Control

Right-clicking the barcode shows a list including Active Barcode Control Object with a Properties link that opens up a form that allows definition of the barcode properties like dimensions and Code type.

There's a General module in the database containing this

CODE -->

Function barcode()

    Dim rpt As Report
    Dim strBarcode As String
    Set rpt = Reports![Pick List]
    strBarcode = "SO" & Format(rpt!OrderID, "<<<<<&")
    rpt.ScaleMode = 1

End Function 

In use this all produces a barcode for the Order ID prefaced by SO.

This is far as I can go in trying to identify how this all works, including how the control would have been inserted and how it operates. Any steers would be much appreciated.

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Tek-Tips Forums free from inappropriate posts.
The Tek-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members! Already a Member? Login

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close