视频摄像头的贴子
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=41778
狐表引用
zxing.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)
以下内容只有回复后才可以浏览
使用感受：识别率还好，与 zbar比 有过之而无不及
大家自己集成视频 就ok了 给大家 800元啊（之前找别人开发，要我800
，后来就自己动手丰衣足食了）
[此贴子已经被作者于2013-12-30 13:24:34编辑过]
加好友 
发短信
Post By：2013/12/29 17:31:00 [只看该作者]
[本帖被加为精华]
