以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请问使用狐表,如何读取二维码呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87533)

--  作者:wendude
--  发布时间:2016/7/13 10:10:00
--  [求助]请问使用狐表,如何读取二维码呢?
[求助]请问使用狐表,如何读取二维码呢?
--  作者:大红袍
--  发布时间:2016/7/13 10:13:00
--  

引用dll,然后写代码

 

Dim img As Image = Image.FromFile("C:\\Users\\Administrator\\Desktop\\b1.jpg") ’图片地址哦!
Dim bmap As Bitmap
bmap = New Bitmap(img)
Dim source As New RGBLuminanceSource(bmap, bmap.Width, bmap.Height)
Dim bitmap As com.google.zxing.BinaryBitmap = New com.google.zxing.BinaryBitmap(New com.google.zxing.common.GlobalHistogramBinarizer(source))
Dim asd As new com.google.zxing.MultiFormatReader
Dim result As com.google.zxing.Result = asd.decode(bitmap)
MessageBox.Show(result.Text)

 

下载信息  [文件大小:71.4 KB  下载次数:439]
图片点击可在新窗口打开查看点击浏览该文件:zxing.rar


--  作者:wendude
--  发布时间:2016/7/13 10:20:00
--  读取二维码的值能够自动存入文本框中吗?
读取二维码的值能够自动存入文本框中吗?
--  作者:大红袍
--  发布时间:2016/7/13 10:50:00
--  

 Forms("窗口1").Controls("TextBox1").Text = result.Text


--  作者:wendude
--  发布时间:2016/7/13 11:20:00
--  再问一下,如何使用手持终端,扫不同设备上的二维码,那么图片地址怎么写呢?
再问一下,如何使用手持终端,扫不同设备上的二维码,那么图片地址怎么写呢?
--  作者:大红袍
--  发布时间:2016/7/13 11:24:00
--  

 1、foxtable只能在windows系统上运行

 

 2、如果你的是win8、win10平板电脑,可以尝试用摄像头拍照后保存为图片再扫描二维码。


--  作者:wendude
--  发布时间:2016/7/13 11:47:00
--  狐表可以在手持终端上运行吗?wince上 谢谢
狐表可以在手持终端上运行吗?wince上 谢谢
--  作者:大红袍
--  发布时间:2016/7/13 11:48:00
--  
 不可以的。
--  作者:wendude
--  发布时间:2016/7/13 11:54:00
--  生成的.exe程序也不行么?
生成的.exe程序也不行么?
--  作者:大红袍
--  发布时间:2016/7/13 11:58:00
--  
 是的,不支持此系统。