请问如何用asp控制读扫条形码？

lovetm 2005-06-11 11:34:53
最近用asp做公司oa，在做的图书管理上，公司要求能录入图书条形码，在同事借书登记，直接使用红外扫描图书条形码！这个问题搞了好久不知道怎么做！请教下高手！
...全文
288 15 打赏 收藏 转发到动态 举报
写回复
用AI写文章
15 条回复
切换为时间正序
请发表友善的回复…
发表回复
satans18 2005-06-15
  • 打赏
  • 举报
 回复
如果把条码枪看做是键盘之类的输入工具就容易理解了
up1002 2005-06-15
  • 打赏
  • 举报
 回复
数据库中要保存条码相应的字段。
也就是说，你录入数据（建设基础数据）的时候，就要用条码枪扫条码录入，
其实也就相当于键盘输入条码。
只要数据库里记下了这个字段，查询时使用用户的条码枪录入的条码作查询条件来查询，
就是最最最最最基本的一个问题了吧！
lovetm 2005-06-15
  • 打赏
  • 举报
 回复
life360(wenjian)你说的我现在知道了！不过还有点地方没搞定，就是扫枪扫出来的数字如何和数据库中的数字对比啊？我在asp程序里无法取得扫出来的数字啊！晕死！
life360 2005-06-15
  • 打赏
  • 举报
 回复
实际上你什么都不用管。

条形枪扫出来的数字相当于用键盘输入数字并按回车键
lovetm 2005-06-15
  • 打赏
  • 举报
 回复
晕了，能不能写个条码通过枪扫的这个过程的范例程序看看啊！就是搞不明白！
yonghengdizhen 2005-06-14
  • 打赏
  • 举报
 回复
你不需要管条码是通过枪扫的还是通过键盘录入的,从任何应用程序的角度来看,那就是一个标准的击键序列.
至于你剩下的问题是一个非常初级的问题了
lovetm 2005-06-14
  • 打赏
  • 举报
 回复
非常谢谢各位！我想知道通过条形枪扫出来的数字如何对比能和数据库里录入好的数字对比？最好能给个实际的代码看看！因为从来没有涉及到这个方面！
iuhxq 2005-06-11
  • 打赏
  • 举报
 回复
自己写activex控件
zhlym 2005-06-11
  • 打赏
  • 举报
 回复
条形码其实N简单,条形码读取过程你不需要理会,你需要做的只是把条形码下方的数字录入你的数据库,然后扫描时用条码枪扫出来的数字和你数据库里的数字相比而已
feibar 2005-06-11
  • 打赏
  • 举报
 回复
肯定要用控件了
zorou_fatal 2005-06-11
  • 打赏
  • 举报
 回复
up

楼主详细阐述问题，你要得到什么，想处理什么。
dreampeter 2005-06-11
  • 打赏
  • 举报
 回复
有存在这样的问题么？
安装了扫描器驱动后只要对准条形码，系统是会自动在得到焦点的文本框内填入相应的编码的，这一步是不需要任何程序的。
cheng17 2005-06-11
  • 打赏
  • 举报
 回复
楼上的好啊
ljlyy 2005-06-11
  • 打赏
  • 举报
 回复
这个是根据条形码数字生成条形码的代码，我测试过，可以生成。不知对你有没有用。
注：不是我写的，我不记得是哪位仁兄写的。
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<form name="form1" method="post">
<div ALIGN="CENTER">请输入合法字符："ABCDEFGHIJKLMNOPQRSTUVWXYZ 1234567890 + - * / %$ ."<br><br>
<input name="chars" type="text" value="<%=request("chars")%>" size="25" maxlength="15">
<input type="submit" name="Submit" value="提交">
</div>
</form>
<%
Dim Chars, CodeHeight, CodeWidth
Chars = Request("chars")
'指定条形码的高和宽
CodeHeight = 52
CodeWidth = 2
'将String1转化为特殊字符串
Public Function BarCode(String1)
Dim TempStr
TempStr = String1
TempStr = replace(TempStr,"0","_|_|__||_||_|")
TempStr = replace(TempStr,"1","_||_|__|_|_||")
TempStr = replace(TempStr,"2","_|_||__|_|_||")
TempStr = replace(TempStr,"3","_||_||__|_|_|")
TempStr = replace(TempStr,"4","_|_|__||_|_||")
TempStr = replace(TempStr,"5","_||_|__||_|_|")
TempStr = replace(TempStr,"7","_|_|__|_||_||")
TempStr = replace(TempStr,"6","_|_||__||_|_|")
TempStr = replace(TempStr,"8","_||_|__|_||_|")
TempStr = replace(TempStr,"9","_|_||__|_||_|")
TempStr = replace(TempStr,"a","_||_|_|__|_||")
TempStr = replace(TempStr,"b","_|_||_|__|_||")
TempStr = replace(TempStr,"c","_||_||_|__|_|")
TempStr = replace(TempStr,"d","_|_|_||__|_||")
TempStr = replace(TempStr,"e","_||_|_||__|_|")
TempStr = replace(TempStr,"f","_|_||_||__|_|")
TempStr = replace(TempStr,"g","_|_|_|__||_||")
TempStr = replace(TempStr,"h","_||_|_|__||_|")
TempStr = replace(TempStr,"i","_|_||_|__||_|")
TempStr = replace(TempStr,"j","_|_|_||__||_|")
TempStr = replace(TempStr,"k","_||_|_|_|__||")
TempStr = replace(TempStr,"l","_|_||_|_|__||")
TempStr = replace(TempStr,"m","_||_||_|_|__|")
TempStr = replace(TempStr,"n","_|_|_||_|__||")
TempStr = replace(TempStr,"o","_||_|_||_|__|")
TempStr = replace(TempStr,"p","_|_||_||_|__|")
TempStr = replace(TempStr,"r","_||_|_|_||__|")
TempStr = replace(TempStr,"q","_|_|_|_||__||")
TempStr = replace(TempStr,"s","_|_||_|_||__|")
TempStr = replace(TempStr,"t","_|_|_||_||__|")
TempStr = replace(TempStr,"u","_||__|_|_|_||")
TempStr = replace(TempStr,"v","_|__||_|_|_||")
TempStr = replace(TempStr,"w","_||__||_|_|_|")
TempStr = replace(TempStr,"x","_|__|_||_|_||")
TempStr = replace(TempStr,"y","_||__|_||_|_|")
TempStr = replace(TempStr,"z","_|__||_||_|_|")
TempStr = replace(TempStr,"-","_|__|_|_||_||")
TempStr = replace(TempStr,"*","_|__|_||_||_|")
TempStr = replace(TempStr,"/","_|__|__|_|__|")
TempStr = replace(TempStr,"%","_|_|__|__|__|")
TempStr = replace(TempStr,"+","_|__|_|__|__|")
TempStr = replace(TempStr,".","_||__|_|_||_|")
BarCode = TempStr
End Function
'将BarCode1显示为条形码
Public Function ShowCode(BarCode1)
Dim Chars
Chars = BarCode1
Chars = replace(chars,"_","<span style='height:"&CodeHeight&";width:"&CodeWidth&";background:#FFFFFF'></span>")
Chars = replace(chars,"|","<span style='height:"&CodeHeight&";width:"&CodeWidth&";background:#000000'></span>")
ShowCode = Chars
End Function
'使用正则表达式验证String1是否匹配Pattern
Public Function Validation(Pattern, String1)
Dim RegExp1, Matches
'建立正则表达式
Set RegExp1 = New RegExp
'设置模式
RegExp1.Pattern = Pattern
'设置是否区分字符大小写
RegExp1.IgnoreCase = True
'设置全局可用性
RegExp1.Global = True
Matches = RegExp1.Test(String1)
Validation = Matches
End Function
'验证用户输入数据的合法性
If Chars <> "" Then
If Validation("^[abcdefghijklmnopqrstuvwxyz1234567890\+\-\*\/\%\$\.]*$",Chars) Then
'用户输入数据的合法，显示条形码
TempChars = Chars
Chars = LCase(Chars)
%>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" height="79">
<tr>
<td height="61" align="center"><%=ShowCode(BarCode(Chars))%></td>
</tr>
<tr>
<td height="18" align="center"><%=(TempChars)%></td>
</tr>
</table>
</center>
</div>
<%
Else
'用户输入数据的非法，提示错误
Response.Write("<br><center style='color:red;'>含有非法字符 </center>")
End If
End If
%>
</body>
</html>
asp.net （C#） 生成条形码
在ASP.NET（C#）开发环境中，生成条形码是一项常见的需求，特别是在电子商务、物流管理、库存控制等领域。本文将详细介绍如何使用C#语言在ASP.NET平台上实现条形码的生成。 首先，条形码是一种光学可读的图形，用于...
barcode与MSreportview
在IT行业中，条形码（barcode）是一种广泛用于标识物品的自动识别技术，它通过将数据编码成可读的线条图形来实现快速的数据输入。在本主题中，“barcode与MSreportview”涉及到如何在Microsoft的报表视图（MS Report...
条码code128编码规则.pdf
2. 允许双向扫描。 3. 可自行决定是否加上检验位。 4. 条码长度可调，但包括开始位和结束位在内，不可超过 232 个字元。 5. 同一个 Code128 码，可以由 A、B、C 三种不同编码规则互换，既可扩大字元选择的范围，也可...
Lab1_Barcode
4. **读取条形码**：读取条形码通常涉及扫描仪设备和相应的API。C#中，可以使用`ZXing.Net`库来解码图像中的条形码，该库支持多种条形码格式的读取。 5. **Windows Forms和WPF应用**：如果你正在开发桌面应用，C#的...
java开源包1
条形码扫描和识别程序 LVBarcode LVBarcode 支持下列的条形码格式：Codabar,I2of5,Code39,ExCode39?,EAN-8,EAN-13,Code128 A,Code128 B,Code128 C,MSI,UPC-A,UPC-E. 中文转拼音库 pinyin4j Pinyin4j是一个流行的...
ASP

28,405

社区成员

356,946

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章