上海邦麦信息科技有限公司旗下子网站；POS系统、计算机技术资料搜集
当前位置：
& EAN-13码知识及其校验码的计算方法
相关（或随机）文章
文章目录[]
版权声明：可以任意转载，但转载时请务必以超链接形式标明文章原始出处。
免责声明：操作需谨慎，本人不对使用此文章中所列方法造成的任何后果负责。
本文链接：本文来自 >>
国际商品编码（International Article Number），即欧洲商品编码（European Article Number, EAN），原来只是欧洲范围内的，而现在已是全球范围内产品交易的商品代码。就是现在我们常说的国际条码。
国际条码又分EAN-13码和EAN-8码，EAN-13码是为普通商品设置，而EAN-8是专门为小商品设置的。
EAN-13码的组成
13位代码=3位国家代码+4为生厂商代码+5位商品代码+1位校验码
国家代码和生厂商代码：又各国EAN总部具体发放和管理
商品代码：有厂商自行设定
校验码：根据前面的12位代码计算
EAN-13码校验码的计算方法
从右边开始数：
A=奇数位的和×3
B=偶数位的和
C=(A+B)取个位
校验码=10-C（如果差值为10，则校验码为0）
EXCEL中的校验码的计算公式：
=RIGHT(SUM(LEFT($A$1,{0,1}+{1;3;5;7;9;11})*{9,7}))
EAN8 在条码前加入5个0，计算公式与EAN13一样
=RIGHT(SUM(LEFT(&#″&$B$1,{0,1}+{1;3;5;7;9;11})*{9,7}))
有的客户那里制作的会员卡是EAN13码，前12位按顺序增长，最后一位是自动生成的校验位。如果我们要将会员卡号批量导入启谋中的话，就需要在Excel中批量生成前12位然后计算校验码后合并之，最后导入启谋中。（启谋不支持EAN13码校验位的自动生成，所以无法在启谋中批生成卡号）
对本文发表评论
collapsItems['collapsCat-722:3'] = '';
collapsItems['collapsCat-723:3'] = '';
collapsItems['collapsCat-725:3'] = '';
collapsItems['collapsCat-724:3'] = '';
collapsItems['collapsCat-279:3'] = ' (27)
collapsItems['collapsCat-242:3'] = '';
collapsItems['collapsCat-31:3'] = '';
collapsItems['collapsCat-7:3'] = '';
collapsItems['collapsCat-491:3'] = ' (105)
collapsItems['collapsCat-75:3'] = '';
collapsItems['collapsCat-53:3'] = '';
collapsItems['collapsCat-76:3'] = '';
collapsItems['collapsCat-502:3'] = ' (42)
collapsItems['collapsCat-272:3'] = '';
collapsItems['collapsCat-401:3'] = '';
collapsItems['collapsCat-1:3'] = '';
Collapse Functions, version 2.0
*--------------------------------------------------------------------------*/
String.prototype.trim = function() {
return this.replace(/^\s+|\s+$/g,"");
function createCookie(name,value,days) {
if (days) {
var date = new Date();
date.setTime(date.getTime()+(days*24*60*60*1000));
var expires = "; expires="+date.toGMTString();
var expires = "";
document.cookie = name+"="+value+expires+"; path=/";
function readCookie(name) {
var nameEQ = name + "=";
var ca = document.cookie.split(';');
for(var i=0;i
2016年十月
2016年九月
2016年七月
2016年六月
2016年五月
2016年四月
2016年三月
2016年一月
2015年十二月
2015年十月
2015年九月
2015年七月
2015年六月
2015年五月
2015年三月
2014年十二月
2014年十一月
2014年九月
2014年八月
2014年七月
2014年六月
2014年五月
2014年四月
2014年二月
2014年一月
2013年十二月
2013年十一月
2013年九月
2013年八月
2013年七月
2013年六月
2013年五月
2013年四月
2013年三月
2013年二月
2013年一月
2012年十二月
2012年十一月
2012年十月
2012年九月
2012年八月
2012年七月
2012年六月
2012年五月
2012年四月
2012年三月
2012年二月
2012年一月
2011年十二月
2011年十一月
2011年十月
2011年九月
2011年八月
2011年六月
2011年五月
2011年四月
2011年三月
2011年二月
2011年一月
2010年十二月
2010年十一月
2010年十月
2010年九月
2010年六月
2010年五月
2010年四月
2010年三月
2010年二月
2010年一月
2009年十二月
2009年十一月
2009年十月
2009年九月
2009年八月
2009年七月
2009年六月
2009年五月
2009年四月
2009年三月&&&&EAN13校验码计算方法1
&EAN13校验码计算方法1
为了方便计算，EXCEL公式计算出，EAN13校验码计算方法1,
若举报审核通过，可奖励20下载分
被举报人：
举报的资源分：
请选择类型
资源无法下载
资源无法使用
标题与实际内容不符
含有危害国家安全内容
含有反动色情等内容
含广告内容
版权问题，侵犯个人或公司的版权
*详细原因：
VIP下载&&免积分60元/年（1200次）
您可能还需要
Q.为什么我点的下载下不了，但积分却被扣了
A. 由于下载人数众多，下载服务器做了并发的限制。若发现下载不了，请稍后再试，多次下载是不会重复扣分的。
Q.我的积分不多了，如何获取积分？
A. 获得积分，详细见。
完成任务获取积分。
论坛可用分兑换下载积分。
第一次绑定手机，将获得5个C币，C币可。
关注并绑定CSDNID，送10个下载分
下载资源意味着您已经同意遵守以下协议
资源的所有权益归上传用户所有
未经权益所有人同意，不得将资源中的内容挪作商业或盈利用途
CSDN下载频道仅提供交流平台，并不能对任何下载资源负责
下载资源中如有侵权或不适当内容，
本站不保证本站提供的资源的准确性，安全性和完整性，同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
课程资源下载排行
您当前C币：0&&&可兑换 0 下载积分
兑换下载分:&
消耗C币:0&
立即兑换&&
兑换成功你当前的下载分为 。前去下载资源
你下载资源过于频繁，请输入验证码
如何快速获得积分？
你已经下载过该资源，再次下载不需要扣除积分
EAN13校验码计算方法1
所需积分：1
剩余积分：0
扫描微信二维码精彩活动、课程更新抢先知
VIP会员，免积分下载
会员到期时间：日
剩余下载次数：1000
EAN13校验码计算方法1
剩余次数：&&&&有效期截止到：
你还不是VIP会员VIP会员享免积分 . 专属通道极速下载
VIP下载次数已满VIP会员享免积分 . 专属通道极速下载，请继续开通VIP会员
你的VIP会员已过期VIP会员享免积分 . 专属通道极速下载，请继续开通VIP会员当前条码类型是：EAN-13 商品条码13位条形码
2:请配置以下内容
生成图片格式
PNG格式 - Portable Network GraphicsJPEG格式 - Joint Photographic Experts GroupGIF格式 - Graphics Interchange Format
&&默认72数值越大图片越清晰 范围72-300
&&设置条码的高度,数据越大高度越高。范围20-90
&&条码尺寸大小数值越大尺寸越大,范围1-4
不旋转90& 度180& 度270& 度 &&可以进行90-270度的旋转
字体/字号大小
No LabelArial.ttfbaiduzhonyi.ttfshangpintiaoma.ttftt0142m_.ttftt0144m_.ttf &&调整字体及字体的大小,范围1-30
输入条码号
Valid Characters
EAN条码是由国家物品中心登记的商品条码
EAN-13条码用于商品标识的一种包装条码
由3位国家代码,4位厂商代码,5位产品代码以及1位校正码组成。
3:生成输出 右键条码图片另存为可下载到本地关于EAN13码验证,如何验证早期系统里面商品EAN13码是否正确
[问题点数：40分，结帖人boo6786733]
关于EAN13码验证,如何验证早期系统里面商品EAN13码是否正确
[问题点数：40分，结帖人boo6786733]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
本帖子已过去太久远了，不再提供回复功能。新浪广告共享计划>
广告共享计划
EAN13条码验证码的计算
&&&&&&&&&&&&&&&&&&&&&&&
EAN13条码验证码的计算
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
&&& Private
Function CheckCode(ByVal txt As String) As String
Dim calcNum As String = ""
Dim a1, a2, a3, a4, a5, a6, a7, a8, a9, a10, a11, a0 As
If txt.Length = 12 Then
&&&&&&&&&&&
a0 = Convert.ToInt32(txt.Substring(0, 1))
&&&&&&&&&&&
a1 = Convert.ToInt32(txt.Substring(1, 1))
&&&&&&&&&&&
a2 = Convert.ToInt32(txt.Substring(2, 1))
&&&&&&&&&&&
a3 = Convert.ToInt32(txt.Substring(3, 1))
&&&&&&&&&&&
a4 = Convert.ToInt32(txt.Substring(4, 1))
&&&&&&&&&&&
a5 = Convert.ToInt32(txt.Substring(5, 1))
&&&&&&&&&&&
a6 = Convert.ToInt32(txt.Substring(6, 1))
&&&&&&&&&&&
a7 = Convert.ToInt32(txt.Substring(7, 1))
&&&&&&&&&&&
a8 = Convert.ToInt32(txt.Substring(8, 1))
&&&&&&&&&&&
a9 = Convert.ToInt32(txt.Substring(9, 1))
&&&&&&&&&&&
a10 = Convert.ToInt32(txt.Substring(10, 1))
&&&&&&&&&&&
a11 = Convert.ToInt32(txt.Substring(11, 1))
&&&&&&&&&&&
Dim num1 As Integer = (a1 + a3 + a5 + a7 + a9 + a11) * 3
&&&&&&&&&&&
Dim num2 As Integer = a0 + a2 + a4 + a6 + a8 + a10
&&&&&&&&&&&
Dim num3 As Integer = num1 + num2
&&&&&&&&&&&
Dim num4 As Integer =
Convert.ToInt32(num3.ToString.Substring(num3.ToString.Length -
&&&&&&&&&&&
Dim num5 As String = ""
&&&&&&&&&&&
If num4 = 0 Then
&&&&&&&&&&&&&&&
&&&&&&&&&&&
&&&&&&&&&&&&&&&
num5 = 10 - num4
&&&&&&&&&&&
&&&&&&&&&&&
calcNum = txt & num5
Return calcNum
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。