El código de barras PDF 417 es una simbología de código de barras 2D capaz de codificar más de 1000 caracteres.

Con el paquete de fuentes PDF417 barcode de Barcodesoft y Microsoft® Access®, nunca ha sido tan fácil imprimir códigos de barras PDF417 desde su computadora Windows y su impresora de escritorio.

1. Copie todas las fuentes TrueType (*.ttf) que se encuentran bajo la carpeta fonts y péguelas en su carpeta c:\Windows\Fonts.

2. Abra el símbolo del sistema (DOS). Si está utilizando Windows, por favor abra el símbolo del sistema como administrador.
Por favor, vaya a la siguiente carpeta:
CD C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil
Escriba el siguiente comando de DOS para registrar crUFLbcs.dll:
regsvr32 crUFLbcs.dll


Si el registro falla, por favor utilice el siguiente comando de DOS para registrarlo.
Regtlibv12 es una utilidad de Windows .NET Framework 2.0.
Regtlibv12 _cruflbcs.tlb

3. Inicie Microsoft® Access® y cambie el nivel de seguridad.
Si utiliza Access 2010 o superior, por favor haga clic en el Botón de Microsoft Office
Luego haga clic en “Opciones de Access”, se abrirá un cuadro de diálogo. Seleccione “Centro de confianza”, haga clic en “Configuración del Centro de confianza”. Establezca la configuración de macros en “Habilitar todas las macros” como se muestra a continuación.



4. Inicie Microsoft® Access® primero. Presione ALT + F11 para abrir el editor de Microsoft® Visual Basic.



5. Desde el editor de Visual Basic, elija el menú Herramientas ===> Referencias. Aparecerá un cuadro de diálogo. Haga clic en el botón Examinar y elija la biblioteca cruflbcs.dll de su carpeta de trabajo.
Normalmente se encuentra bajo la carpeta C:\Program File\CommonFiles\Barcodesoft\Fontutil.
Active la casilla junto a crUFLBcs 1.0 Type Library como se muestra abajo. Luego haga clic en el botón Aceptar.





6. Presione Ctrl+M, aparecerá un cuadro de diálogo, elija barcodesoft.bas bajo la ruta
C:\Program File\CommonFiles\Barcodesoft\Fontutil. Luego haga clic en "Abrir".



Si la función PDF417 o MicroPDF417 se ve diferente a los códigos de abajo,
por favor copie y pegue el siguiente fragmento de código para reemplazarlo en el módulo barcodesoft.

Public Function PDF_417(strToEncode As String) As String
Dim obj As cruflBCS.CPDF417
Set obj = New cruflBCS.CPDF417
PDF_417 = obj.Encode(strToEncode, 0, 0, 0, 0, 0, 0)
;El segundo parámetro es el índice de la cadena, el valor predeterminado es cero.
; El tercer al séptimo parámetro son las opciones MaxRow, FixedColumn, Security, Compaction Mode y Truncated
Set obj = Nothing
End Function

Public Function MicroPDF417(strToEncode As String) As String
Dim obj As cruflBCS.CMicroPDF417
Set obj = New cruflBCS.CMicroPDF417
MicroPDF417 = obj.Encode(strToEncode)
Set obj = Nothing
End Function



7. Cierre Visual Basic y regrese a su base de datos de Access. Ahora, cree un informe en Vista Diseño y escriba una de las siguientes macros en el campo donde desea mostrar el código de barras pdf417 o código de barras microPDF417 antes de aplicar el tipo de fuente "BcsPdf417":
=pdf417([data.code])
=micropdf417([data.code])

Por favor, tome en cuenta que 'data' es el nombre de la tabla y 'code' es el nombre del campo.




8. Haga clic derecho en el campo donde desea mostrar el código de barras PDF417. Elija Propiedades en el menú contextual. Aplique el tipo de fuente BCSPdf417 al campo.




Otra solución inteligente y sencilla para imprimir códigos de barras PDF417 es usar Microsoft® Word. Primero inicie Barcodesoft Encoder, luego escriba lo que desee codificar. Después, presione el botón Copiar al portapapeles. Ahora abra Word y presione Ctrl+V. Verá aparecer el código de barras PDF417.

Para obtener más información sobre el código de barras PDF417, por favor haga clic en BarCodeSoft PDF417 Bar Code.

Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y/u otros países.