Office中国论坛/Access中国论坛

标题: 如何实现数据自动输入 [打印本页]

作者: wule_liu 时间: 2015-3-16 17:40
标题: 如何实现数据自动输入
(, 下载次数: 144)
如图所示，将扫描数据自动输入到对应的表格，本人新手，求详细一点的代码或步骤，万分感激！

作者: tmtony 时间: 2015-3-16 17:42
当然可以，但这个不是一句代码写出来
最好写个函数专门来处理

作者: wule_liu 时间: 2015-3-16 17:44

tmtony 发表于 2015-3-16 17:42
当然可以，但这个不是一句代码写出来
最好写个函数专门来处理

求指教！

作者: roych 时间: 2015-3-16 17:52
木有附件，所以就只有思路了（在afterUpdate事件里写）。
第一步，先用split把字符串#分离成两段（用split时需要在第一个数组上加上"#"。或者用left+instr，随便你了）。
第二步，用DAO或者ADO（ADOX也可以）打开记录集来历遍字段名称，注意加上where子句，这样的话下一步就省事一些。
第三步，根据字段名称与第一个字符串相等，然后写入数据，update，关闭记录集等等。

作者: wule_liu 时间: 2015-3-16 17:54

roych 发表于 2015-3-16 17:52
木有附件，所以就只有思路了（在afterUpdate事件里写）。
第一步，先用split把字符串#分离成两段（用split ...

菜鸟表示看不懂，我上附件！

作者: wule_liu 时间: 2015-3-16 17:58
http://pan.baidu.com/s/1dDle3pn

作者: wule_liu 时间: 2015-3-16 17:58

wule_liu 发表于 2015-3-16 17:58
http://pan.baidu.com/s/1dDle3pn

附件上传不了，我放在百度云里面，求高手指点！

作者: roych 时间: 2015-3-17 11:11
试试吧。我这里没有扫描枪，应该是在更新后事件里可以执行的。
(, 下载次数: 499)

作者: wule_liu 时间: 2015-3-17 11:30

roych 发表于 2015-3-17 11:11
试试吧。我这里没有扫描枪，应该是在更新后事件里可以执行的。

刚试了一下，没有反应，扫描枪输入和键盘输入是一样的，“1# JRT0404-03回车”中间有个空格，提示错误“下标越线”

作者: wule_liu 时间: 2015-3-17 11:34

roych 发表于 2015-3-17 11:11
试试吧。我这里没有扫描枪，应该是在更新后事件里可以执行的。

看列一下，回车后不是执行，而是换行，是不是这个问题？

作者: roych 时间: 2015-3-18 10:59

wule_liu 发表于 2015-3-17 11:34
看列一下，回车后不是执行，而是换行，是不是这个问题？

可能吧。因为没有绑定表，所以还是比较麻烦。。。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)