转自:http://www.cnblogs.com/DelphiFan/archive/2009/07/26/1645572.html
最近客户要求在货品资料中生成商品条码(即EAN13,国际商品条码),虽然系统中有商品条码生成的工具,但是对不上号,根本无法使用,客户的货品资料已经有部分有条码,更重要的是客户要求生成商品条码的货品无法正常筛选出来(比如:GW开头,或者是GM开头,而且要求的是GW和GM后面全是数字的货品才要求生成),客户又急着用,没有办法的情况下,就自己动手写了一个小工具,虽然客户无法使用,但是对于维护客户的商品条码生成,确是相当的方便,现记录下,以便将来查看:
生成EAN13条码的SQL函数代码:
create function dbo.EAN13(@value varchar(13))
returns varchar(13)
as
begin
declare @s1 int ,@s2 int ,@s3 int
declare @t table (id int identity(1,1),b bit)
insert into @t(b)
select top 13 1 from syscolumns
set @value='0'+reverse(@value)
select @s1=sum(cast(substring(@value,id,1) as int))
from @t a
where len(@value)>=id and id%2=0
set @s1=@s1*3
select @s2=sum(cast(substring(@value,id,1) as int))
from @t a
where len(@value)>=id and id>=3 and id%2=1
set @s3=right(@s1+@s2,1)
return left(reverse(@value),12)+ltrim(10-case @s3 when '0' then '10' else @s3 end)
end
go
函数调用:
select dbo.ean13(694386035966) 返回值:6943860359663
在程序中执行时,可以手工写入SQL语句,这样,可以自由的提出要生成的货品资料,例如:
select code,name,standardcode from goods where (patindex('GW[0-9]%',Code)>0 or patindex('GM[0-9]%',Code)>0) and
(standardcode is null)
动态的指定SQL语句,相当方便。
分享到:
相关推荐
能快速生成EAN13的条形码,用处很多,更多条形码知识,可以访问http://www.tz8.net
EAN-13条形码生成的 C#源码
利用C语言生产条形码的代码,能够生成EAN13条形码,代码不够简洁,但功能完全,大约500多行
EAN13条码生成,可以用于嵌入式相关设备开发(内部包含一套EAN13码生成代码+BMP文件生成代码),采用C语言,属于半原创吧[大部分代码是百度获取,作者不详,本人结合相关接口实现自己所需要的功能],采用VS2010工程,...
在Excel中利用字体文件生成Ean13条形码。内附代码VBA代码含效果展示。
demo程序详细资料见博客。博客有相关代码和相关软件测试截图和运行生成代码截图文件。此压缩包为该项目工程打包文件。
条码生成Function EAN13(BM As String ) Private BM Dimension EAN_code[10,3] EAN_code[1,1]='00000011110011' EAN_code[1,2]='00110000111111' EAN_code[1,3]='11111100001100' EAN_code[2,1]='00001111000011' ...
适用:按照需要生成EAN13标准的条形码
【最新优化版】可根据输入的12位数字离线生成相应的EAN-13条形码,相较于Ver.1优化了初始界面,并且增加了两位输入数字(Ver.1只根据10位的输入数字,生成以69为固定开头的EAN-13条形码;Ver.2可自定义前置码以及第...
Python 根据用户输入编码批量生成EAN-13条形码 Python源码Python 根据用户输入编码批量生成EAN-13条形码 Python源码Python 根据用户输入编码批量生成EAN-13条形码 Python源码Python 根据用户输入编码批量生成EAN-13...
离线生成EAN-13条形码,本代码以69为固定开头!!!为eclipse上完成的Java代码。根据输入10位整数即可生成相应EAN-13条形码。
能够批量实现数据窗口内内容条形码的批量打印 ean8码为7位数值+1位校验位 ean13码为12位数值+1位校验位 code39码可为数值及字母的任意组合 三种条形码各有100个随机测试 按数据窗口字段内容编码,解决用控件不能实现...
Barcode-generator:能自动生成EAN-13,EAN-8和EAN-5条形码的桌面应用,具有多种尺寸的JPEG GIF图像文件
PB中利用字体实现EAN13条码的打印,不需要控件。请先将包里的ean13.ttf安装到Windows的字体Fonts目录下. 本方法可以很方便的将图书ISBN打印出条码。
jQuery.EAN13.js是一款基于HTML5 Canvas的EAN13条形码生成插件。该EAN13条形码插件可以配合jQuery来使用,也可以通过纯JavaScript来进行调用。通过该插件可以非常轻松的在页面上生成EAN13条形码。
对EAN-13编码规则的演示程序,使用html+javascript+vml模拟实现,EAN-13编码规则可以参考:http://blog.csdn.net/FuWaer/archive/2007/09/03/1770317.aspx
使用C语言通过EasyX绘图库生成EAN13码,简单易懂,内含EAN13码编码规则。
简单、快捷、好用
C# 源码 Ean13 条形码 控件 可以另存为图片
EAN-13条形码CDR矢量图,号码是:5 050048 154208