我们 产品 技术支持 博客 联系我们

EAN13 条码

关键词: EAN 13, EAN 8, Japanese Article Number (JAN)

国际商品编号(也称为欧洲商品编号或EAN)是一种条形码符号,用于零售业务以指定产品的制造商和型号。 EAN-13及其变体EAN-8是当今使用最广泛的EAN条形码。

2位数的国家/地区代码加上5位数的制造商代码,再加上5位数的产品代码,再加上校验位,组成了EAN13条码。

当前两位数字的国家/地区代码为45或49时,此条形码为日本商品编号(JAN)。

较小的产品包装使用8位EAN8条形码。

为了显示制造商的建议零售价,人们在EAN13条形码的右侧放置了一个2位数或5位数的补充条形码。

这是EAN13条形码字体的映射表

字符 映射 字符 映射
开始 [ 结束 ]
补充开始 { 补充结束 }
中部分界 | 补充分界 \
纯文本 0xE0 - 0xE9 UPCE 结束字符 '
左手 B 带人眼可读字符 PQWERTYUIO 左手 B 不带人眼可读字符 pqwertyuio
右手带人眼可读字符 :ASDFGHJKL 右手不带人眼可读字符 ;asdfghjkl
左手 A 上方带人眼可读字符 /zxcvbnm,. 左手 B 上方带人眼可读字符 ?ZXCVBNM<>
左手 A 下方带人眼可读字符 0123456789 左手 A 下方不带人眼可读字符 ~!#&40;#$%^&*(<>
EAN13需要在数据的后面附加一个校验码。

如果您使用Barcodesoft EAN13字体打印条形码,请使用我们的编码器为您计算校验码。 您还可以在软件包中找到计算EAN13校验码的VBA和C语言源代码。

软件包中包含以下列出的6种字体,这些字体带有不同的尾随长宽比指示符。 每种Barcodesoft EAN13条码字体的宽高比有所不同。

Barcodesoft EAN13 Demo版本字体有“Demo”水印。

Barcodesoft EAN13条形码字体有TrueType,PostScript,PCL,SVG,开放式(eot)和Web开放字体格式(woff / woff2)等多种格式。 用户可以将EAN13字体嵌入到Adobe PDF文件中。

这是Barcodesoft EAN13条码字体的列表
宽高比 字体
XS UPCEANXS
S UPCEANS
M UPCEANM
L UPCEANL
XL UPCEANXL
XXL UPCEANXXL

这里是Barcodesoft EAN13 条码字体的价格表
许可版本 单用户版 五用户版 十用户版 站点许可证 公司版 开发者版 五开发者版 十开发者版 无限制开发者版
价格 CAD159 CAD299 CAD399 CAD599 CAD799 CAD999 CAD1199 CAD1399 CAD1999

在水晶报表中打印EAN13条码

按照以下步骤,阁下可以轻松在水晶报表中打印EAN13。

1. 打开水晶报表。 右键单击“公式字段”,从上下文菜单中选择“新建...”。

在公式字段的名字框中输入"EAN13",然后点击OK按钮。



2. 从 函数列表==> Additional Functions ==> COM and .NET UFLs (u212com.dll) ==> Visual Basic UFLs, 双击并且选择 "BCSLinearEAN13" 函数。 将数据库字段名作为参数输入 EAN13 公式中。点击保存按钮。如下所示。



3. 在报表中加入一个文本对象。然后将多个公式字段依次拖到你的水晶报表中的文本对象内。阁下会看见一些十六进制的代码。不要担心!因为还没有使用字体。



4. 右键点击文本对象,从上下文菜单中选择“格式字段”。然后选择“UpcEanM”作为字体。



5. 点击OK按钮。你就会看见报表中出现EAN13 条码。



在 MS Excel 电子表格中打印 EAN13 条码

1. 首先下载并且安装EAN13演示版。

2. 以系统管理员的身份打开 DOS 提示符。

输入以下命令来登记 crUFLbcs.dll。
CD C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil
regsvr32 crUFLbcs.dll



3. 启动 Microsoft® Excel®。

如果阁下使用 Excel 2000 或者 2003, 请点击菜单===> 工具 ==> 宏 ===> 安全性。 选择低安全级别。


如果阁下使用 Excel 2007 / 2010 / 2013 / 2016 / 2019, 请点击 Microsoft Office 按钮。

然后点击选项 ==> 信任中心 ==> 宏命令设置, 选择 "允许所有宏"。如下所示。



4. 按 ALT + F11 打开 Microsoft® Visual Basic 编辑器。


5. Visual Basic 编辑器中, 选择菜单工具 ===> 参考。 会谈处一个对话框。 点击浏览按钮, 然后从以下目录中选择 cruflbcs.dll
C:\Program File (x86)\CommonFiles\Barcodesoft\Fontutil。
选择对 crUFLBcs 4.0 添加参考。然后点击 OK 按钮。



6. 按 Ctrl+M, 会弹出一个对话框, 从以下目录上选择 barcodesoft.bas
C:\Program File (x86)\CommonFiles\Barcodesoft\Fontutil 。然后点击 "打开"。

7. 关闭 Visual Basic 回到 Excel 电子表格。在设计模式下创建一个文本框。然后在其控制源中输入以下宏命令: EAN13。当你有很多数据要处理的时候,你可以把这个宏命令复制到整行整列。所有的数据会被立刻编码成EAN13。
=EAN13(xx)

=EAN8(xx)



8. 右键点击单元格B1。从上下文菜单中选择属性。然后将UpcEanM设置为字体。如下所示。


9. 点击OK按钮。阁下的电子表格中就会出现EAN13 条码。

在 MS Access 数据库中产生EAN13 条码

安装了 Barcodesoft EAN13 条码 软件之后, 可以轻松地在 Microsoft® Access® 中打印 EAN13 条码。

1. 在电脑上安装演示版Barcodesoft EAN13 条码 软件。

2. 以系统管理员的身份打开 DOS 提示符。

输入以下命令来登记 crUFLbcs.dll。
CD C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil
regsvr32 crUFLbcs.dll



3. 启动 Microsoft® Access®.

如果阁下使用 Access 2000 或者 2003, 请点击菜单===> 工具 ==> 宏 ===> 安全性。 选择低安全级别。


如果阁下使用 Access 2007 / 2010 / 2013 / 2016 / 2019, 请点击 Microsoft Office 按钮。

然后点击选项 ==> 信任中心 ==> 宏命令设置, 选择 "允许所有宏"。如下所示。



4. 按 ALT + F11 打开 Microsoft® Visual Basic 编辑器。


5. Visual Basic 编辑器中, 选择菜单工具 ===> 参考。 会谈处一个对话框。 点击浏览按钮, 然后从以下目录中选择 cruflbcs.dll
C:\Program File (x86)\CommonFiles\Barcodesoft\Fontutil。
选择对 crUFLBcs 4.0 添加参考。然后点击 OK 按钮。



6. 按 Ctrl+M, 会弹出一个对话框, 从以下目录上选择 barcodesoft.bas
C:\Program File (x86)\CommonFiles\Barcodesoft\Fontutil 。然后点击 "打开"。

如果阁下没有 barcodesoft.bas, 请从这里下载 EAN13 条码


你也可以复制以下的VBA代码片断

Public Function EAN13(strToEncode As String) As String
Dim obj As cruflBCS.CLinear
Set obj = New cruflBCS.CLinear
EAN13 = obj.EAN13(strToEncode)
Set obj = Nothing
End Function

7. 关闭 Visual Basic 回到 Access 数据库。在设计模式下创建一个文本框。然后在其控制源中输入以下宏命令:
=EAN13([data.code])

=EAN8([data.code])

请注意以上宏命令中 'data' 是数据库中表的名字,'code'是字段的名字。



8. 右键点击文本框点。从上下文菜单中选择属性。将UpcEanM设置为字体。阁下的数据库报告中就会出现EAN13 条码。



Microsoft和Office徽标是Microsoft Corporation在美国和/或其他国家/地区的商标或注册商标。