RFBARCODE.ListBarcodeFiles

short ListBarcodeFiles()

Function ListBarcodeFiles() As Integer

Builds an array of barcode configurations filenames existing in the Client.

Return value
The number of files found or -1 if error.

Parameters
The files are created by the StoreBarcode function, and deleted by the DeleteBarcode function.
The filename may be accessed by BarcodeFileName.
The number of menu files may be accessed by BarcodeFileCount.

Remarks

Example
Dim iIdx As Integer
Dim bFound As Boolean

wsRfBarcode.ListBarcodeFiles ' Build file list
bFound = False
' Search the file
' Be careful of DOS uppercase Conversions
For iIdx = 0 To wsRfBarcode.BarcodeFileCount
    If UCase(wsRfBarcode.BarcodeFileName(iIdx)) = "MYBAR" Then
        bFound = True
    End If
Next iIdx

' Load only if not found
If bFound = False Then
    wsRfBarcode.ClearBarcodes ' Clear all barcodes in local (application) array
    wsRfBarcode.AddBarcode CODE_128, False, DECODEON, 1, 32 ' Reads Code 128 Only
    wsRfBarcode.StoreBarcode "MYBAR", BCDISABLED   ' Send the array to the terminal
End If

wsRfBarcode.PushBarcode "MYBAR" ' Sets the scanner configuration

See also    RFBARCODE, BarcodeFileName, BarcodeFileCount