将条码保存为文件出现的错误 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 将条码保存为文件出现的错误

共有11826人关注过本帖树形打印复制链接主题：将条码保存为文件出现的错误

zshdjccf

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：39 积分：369 威望：0 精华：0 注册：2011/8/3 10:29:00

将条码保存为文件出现的错误 发帖心情

Post By：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

zshdjccf

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：39 积分：369 威望：0 精华：0 注册：2011/8/3 10:29:00

Post By：2011/8/29 9:34:00 [显示全部帖子]

以下是引用狐狸爸爸在2011-8-29 8:25: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:35:41编辑过]

zshdjccf

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：39 积分：369 威望：0 精华：0 注册：2011/8/3 10:29:00

Post By：2011/8/29 10:33:00 [显示全部帖子]

加上DPI参数运行一次，OK, 之后不加DPI参数运行也可以

zshdjccf

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：39 积分：369 威望：0 精华：0 注册：2011/8/3 10:29:00

Post By：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