我按照网上的教程, 代码似乎有问题, 仅仅mykeydown就有按键出来了, 根本不需要mykeyup~求老师和高手知道如何才能一直按下某个按键, 知道指定的时长后才抬起呢?是这个SUB有问题吗?Sub MyKeyDown(ByVal vKeyCoad As Long) '
Dim btScancode As Long
btScancode = MapVirtualKey(vKeyCoad, 0)
KBCWait4IBE '发送数据前应该先等待键盘缓冲区为空
SetPortVal KBC_KEY_CMD, &HD2, 1 '发送键盘写入命令
'SetPortVal函数用于向端口写入数据,它的用法是SetPortVal 端口号,欲写入的数据,写入数据的长度
KBCWait4IBE
SetPortVal KBC_KEY_DATA, btScancode, 1 '写入按键信息,按下键
End Sub
Sub MyKeyUp(ByVal vKeyCoad As Long)
Dim btScancode As Long
btScancode = MapVirtualKey(vKeyCoad, 0)
KBCWait4IBE '等待键盘缓冲区为空
SetPortVal KBC_KEY_CMD, &HD2, 1 '发送键盘写入命令
KBCWait4IBE
SetPortVal KBC_KEY_DATA, (btScancode Or &H80), 1 '写入按键信息,释放键
End Sub另外我的winio.dll XP下调试通过, 但是WIN7按照网上的教程, 去打开测试模式和把dll添加到信任根目录,
但是还是提示找不到DLL~求教WIN7下如何使用WINIO.DLL呢?(常常注册没有弹出安全警告, 教程作者说要弹出安全警告才行, 不知道是不是因为我注册了太多次了所以没有警告了)
大半年了都没有解决, 恳求高手指导啊!
可能是winio.dll你是32位的
非常感谢您的回复, 终于有人回答啦!我是在官网下载了64位的WINIO.DLL的, 因为WIN7我无法加载到这个DLL所以没有办法调试,XP下连续发送按下按键十次, TXT上出现两个对应的按键字符~,
终于遇到高手了啊好开心啊!!代码XP下可以运行, 但是在WIN7 64位下就找不到DLL, 我按网上的教程调到测试模式, 安装winio64.sys证书到信任的根目录(, 但是没有安全提示, 好像是说没有安全提示就安装不成功~)
然后代码我试了调用winio.dll, winio32.dll, winio64.dll都不行, 百度N回都是一样的解决方案但是我用百度的解决方法无法解决Orz...... 希望大侠您帮忙解决啊!!非常感谢!!
aspower_ 大侠您好, 试过还是不行呀~请问能再请教您帮忙试试吗, 非常感谢啊!
也不行呢, 应该是绕过了windows机制, 要直接模拟读写键盘端口才行了~
最近发现一个非常奇怪的现象, 就是激活这个跑跑卡丁车的窗口以后, HOOK不到鼠标键盘的按键信息了竟然!!
非常希望赵4老师指导下, 非常感谢!!
赵4老师您好, 测试了也是不行哦~最近发现系统自带的osk.exe比较黑科技啊可以通过~估计是驱动级别的虚拟键盘了, 可惜一次只能按下一个按键啊~
在游戏外挂技术领域,杀手级应用应该是用高清摄像头对着屏幕拍并根据拍得的图像内容实时控制机械手指按键盘或碰触屏或点挪鼠标。我觉得。并且我预言,不久的将来,在电竞领域的AlphaGo就会诞生!
你这个问题解决了吗?我刚好解决了这个问题,可以跟你说下,我是java你开启测试模式,导入签名后,记得要重启,我想你可能也重启了。另外,dll要放对地方,我之前试过放到winows system32下,工程根目录下都不行,后来试过放到jdk bin下就好了。希望对你有帮助。
所以江湖传闻:在各色木马面前,各种安全都形同虚设。