Filter
Top Products
Scanning Functions 4-33
Example VB.NET
Imports Ultra
Dim UPC As New Scan.UPCEAN ' Instantiate class
Dim CONTROL As New Ultra.Scan.Control ' Instantiate class
UPCEAN.EnableUPCA = TRUE; ' Enable UPCA Symbology
UPCEAN.EnableUPCE = FALSE; ' Disable UPCA Symbology
UPCEAN.EnableUPCE1 = FALSE; ' Disable UPCE1 Symbology
UPCEAN.EnableEAN8 = FALSE; ' Disable EAN8 Symbology
UPCEAN.EnableEAN13 = FALSE; ' Disable EAN13 Symbology
UPCEAN.EnableBklnd = FALSE; ' Disable Bklnd Symbology
UPCEAN.Supplement = UPC.eSUPPLEMENTAL.USM_IGNORE;
' Ignore Supplemental characters
UPCEAN.nSupRedundancy = 7; ' Number of times
' Supplemental is decoded
UPCEAN.fXmitUPCACD = TRUE; ' Enable Transmit UPCA C/D
UPCEAN.fXmitUPCECD = FALSE; ' Disable Transmit UPCE C/D
UPCEAN.fXmitUPCE1CD = FALSE; ' Disable Transmit UPCE1 C/D
UPCEAN.nXmitUPCAPre = UPC.eXMITUPCPREAMBLE.XUP_SYSCHAR;
' Transmit UPCA Preamble
UPCEAN.nXmitUPCEPre = UPC.eXMITUPCPREAMBLE.XUP_SYSCHAR;
' Transmit UPCE Preamble
UPCEAN.nXmitUPCE1Pre = UPC.eXMITUPCPREAMBLE.XUP_SYSCHAR;
' Transmit UPCE1 Preamble
UPCEAN.fxlateEToA = FALSE; ' Disable Convert UPCE to UPCA
UPCEAN.fxlateE1toA = FALSE; ' Disable Convert UPCE1 to UPCA
UPCEAN.fEANZeroExtend = FALSE; ' Disable adding zeros
' for EAN13
UPCEAN.fXlate8TO13= FALSE; ' Disable Convert to
' EAN8 to EAN13
UPCEAN.nSecurity = 1; ' Enable Scan Security level
UPCEAN.fCouponCode = TRUE; ' Enable Coupon Scanning
CONTROL.CommitChanges()
' Save Changes to the Scanner Configuration