- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 将条码保存为文件出现的错误 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=12287)
-- 发布时间：2011/8/28 16:45:00
-- 将条码保存为文件出现的错误
在命令窗口输入帮助文件中的一段程序，
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = "123456"
Bar.BarWidth = 0.3
Bar.BarHeight = 8
Bar.SaveImage("c:\\data\\MyBar.jpg")
运行后出现错误，为什么？
此主题相关图片如下：1.jpg
-- 发布时间：2011/8/29 8:25:00
--
升级你的.net framework:
http://download.microsoft.com/download/c/6/e/c6e88215-0178-4c6c-b5f3-158ff77b1f38/NetFx20SP2_x86.exe
-- 发布时间：2011/8/29 9:34:00
--
升级你的.net framework:
http://download.microsoft.com/download/c/6/e/c6e88215-0178-4c6c-b5f3-158ff77b1f38/NetFx20SP2_x86.exe
升级了，又出现一下新的错误提示信息
此主题相关图片如下：screenhunter_002.jpg
-- 发布时间：2011/8/29 9:50:00
--
收到，我检查一下。
-- 发布时间：2011/8/29 10:01:00
--
我这执行没问题啊..
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = "123456"
Bar.BarRatio = 0.3
Bar.BarHeight = 8
Bar.SaveImage("E:\\123.jpg")
-- 发布时间：2011/8/29 10:02:00
--
加上dpi参数就可以了：
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = "123456"
Bar.BarWidth = 0.3
Bar.BarHeight = 8
Bar.SaveImage("c:\\data\\MyBar.jpg",300)
-- 发布时间：2011/8/29 10:33:00
--
加上DPI参数运行一次，OK, 之后不加DPI参数运行也可以
-- 发布时间：2011/8/29 10:36:00
--
真是怪事，我搞定。
-- 发布时间：2011/8/29 10:54:00
--
如何使保存的条码图片与程序中显示的是一样格式的呢？
生成图片的代码：
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = Tables("订单跟踪").current("编号")
bar.Text = Tables("订单跟踪").current("订单_款式")
bar.HumanReadableText = Tables("订单跟踪").current("订单_编号")
Bar.BarWidth = 0.3
Bar.BarHeight = 12
Dim s As String
S="c:\\data\\" & Tables("订单跟踪").current("订单_编号") & ".jpg"
Bar.SaveImage(s)
messagebox.show("文件已生成:" & S)
设置条码的参数为：
图片格式和程序中显示的格式不同
此主题相关图片如下：screenhunter_001.jpg
此主题相关图片如下：未命名.jpg
-- 发布时间：2011/8/29 10:55:00
--
为什么保存的文件只显示一个文本？程序里少了什么设置语句吗？