昨天晚上搞定万象以后,重新安装了实名插件,所有会员刷卡都要手动输入一下密码,真的很烦,找出以前这个VBS自动输入密码 就舒服多了 我们的计费是万象OL +任子行。 保存下面的代码为VBS文件:
set WshShell = CreateObject("WScript.Shell") do if WshShell.AppActivate("卡发行") = true then Wscript.sleep 200 WshShell.sendKEYs "123" Wscript.sleep 200 WshShell.sendkeys "{TAB}" Wscript.sleep 200 WshShell.sendkeys "123456" Wscript.sleep 200 WshShell.sendkeys "{TAB}" Wscript.sleep 200 WshShell.sendkeys "{ENTER}" Wscript.sleep 500 WshShell.sendkeys "%y" end if Wscript.sleep 300 loop还可以建立一个批处理,用来结束这个VBS,毕竟大多收银都是傻的要命,不知道怎么关闭这个VBS程序
批处理代码:
@echo off taskkill /im wscript.exe /f
其实仅限于重装收费机以后,会员卡第一次刷卡的时候要输入密码的问题,第2次以后可以打开万象的循环刷卡功能就可以了。
或者你有懒癌.你直接下载下面的附件