用asp实现三大功能二
这篇文章讨论的是如何根据的字段在web上动态地建立条形码的问题,这在如下的情况下非常有用:用户输入信
息到系统中,然后显示一个总结页面“这就是你所输入的”,这个页面可以被打印,并在日后可以用条形码进行跟踪。
实现这个功能的关键在于如何将数值比如“ABC”翻译为条形码。这里我们使用“代码39”,关于它的详细情况,请参
阅有关定义。我想将产生的条形码显示在web页面上,这样用户就能打印包含条形码的这个页面,然后,再在图形系统的处
理中使用它。许多用户都在系统中安装了“代码39”字体,所以我就能够在页面中改变它,但是我不想依赖它们。我想在
页面中建立,并且独立于和计算机。
我的解决方法是:为Code39中每一个支持的字符创建GIF图形文件。我使用Microsoft Paint创建Code39字体大小
的文本框,然后为每一个字符建立一个图形。接着,使用Microsoft Image Composer将它们转换为GIF格式。最后,使用扫
描检查这些字符,看看是否能正确地解释。下面,你将看到A、B、C以及星号(*)的条形码:
Code for A
Code for B
Code for C
Code for Asterisk
然后,为了在ASP页面中描绘中数值的条形码,仅仅简单地遍历BarCodeText变量字符串中的每一个字符,然后
建立< IMG SRC=“...” >标记以替换字符为相应条形码图形文件。这非常简单,不需要在客户端安装字体文件。相关代码
如下:
'Code 39 barcodes require an asterisk as the start and stop characters
Response.write "< IMG SRC=""asterisk.webp"" WIDTH=""30"" HEIGHT=""36"">"
For x = 1 to Len(Trim(rst("BarCodeText")))
Response.Write "< IMG SRC=""" & mid(rst("BarCodeText"),x,1) & _
".webp"" WIDTH=""30"" HEIGHT=""36"">"
Next
'Code 39 barcodes require an asterisk as the start and stop characters
Response.write "< IMG SRC=""asterisk.webp"" WIDTH=""30"" HEIGHT=""36"">"
如果在记录集当前记录中BarCodeText的数值是“ABC”,那么执行上述代码后,HTML的结果是:
< IMG SRC="asterisk.webp" WIDTH="30" HEIGHT="36">
< IMG SRC="A.webp" WIDTH="30" HEIGHT="36">
< IMG SRC="B.webp" WIDTH="30" HEIGHT="36">
< IMG SRC="C.webp" WIDTH="30" HEIGHT="36">
< IMG SRC="asterisk.webp" WIDTH="30" HEIGHT="36">
然后,将显示如下图形:
现在,将该页面打印后,就可以被条形码扫描器所跟踪了。
有2点关于条形码的注意事项:不是所有的条形码都能支持所有的字符集。Code39是很好而且很简单的一种。它具备可
变长度,支持所有的大写字符、数字、星号以及7个特殊字符。对于每个字符,它使用风格一致的5线(2宽3窄)4空(指间
隙,1宽3窄)形式。另外的字符集支持更多的,使用不同的解码方案。确认对每个字符都建立了GIF图形文件,同时,你可
以修改图形的宽度和高度属性,从而在页面上显示稍大的或者稍小的条形码。
另外,如果遇到特殊的字符,上面的遍历循环代码将不会工作,因为,不能将GIF文件命名为+.webp。这时,就要编写
一个接受字符Ascii数值的函数,然后使用CASE语句返回等价于文件名的字符串。如果字段的数值是整型或者仅仅包
含字符或者数字,上面的遍历代码就已经很好了!
以上介绍的方法不是很复杂,但是在某些方面却是很简单,而且很好用。