按键精灵每运行一次,累加按键次数加多一次。

如何编写按键精灵每运行一次,键盘动作累加1次。
例如,运行第一次,只按一下回车,运行第二的,按两下回车,运行第三次,就按三下回车,如此类推。。
麻烦大家帮一下忙。。

可以实现,下面是一个例子,每过一秒按一次回车,每过一轮叠加一次:

Dim WshShell, Count, fCount
Count = InputBox("请输入您要运行的次数")
If Not IsNumeric(Count)
EndScript
EndIf
Set WshShell = CreateObject("WScript.Shell")
For Count
fCount = fCount + 1
For fCount
WshShell.SendKeys "{Enter}"
EndFor
Delay 1000
EndFor
温馨提示:答案为网友推荐,仅供参考
第1个回答  2010-06-14
//判断一个文件是否存在返回(IsFile),不存在返回false
IsFile = Plugin.File.IsFileExit("D:\配置文件.ini")
If isfile=false
//保存一个配置文件参数(小节名:"Command" 键值名:"Val" 写入内容:"1")
Call Plugin.File.WriteINI("Command", "Val", "1", "D:\配置文件.ini")
End If
//读取一个配置文件参数(小节名:"Command" 键值名:"Val")得到内容(Text )
Text = Plugin.File.ReadINI("Command", "Val", "D:\配置文件.ini")
i=clng(text)
KeyPress 13,i
i=i+1
//保存一个配置文件参数(小节名:"Command" 键值名:"Val" 写入内容:i)
Call Plugin.File.WriteINI("Command", "Val", i, "D:\配置文件.ini")

================================================================
以上是完整程序,每次运行会先检测配置文件,如果没有这个配置文件,就会新建一个,然后从配置文件里得到回车次数i,运行完后i+1,写入配置文件中.当你需要重新开始计算运行次数的时候,只需要把配置文件删除就行了

这个的优点就是不论你重启电脑还是重启按键精灵,下次运行的时候都会接着上一次的次数
第2个回答  2010-06-13
好象不能实现哦,对按键精灵本身进行检测很困难哦。就算能检测出来电脑也会崩溃,要是你启动了10000次,回车键按10000次,看你电脑死机不。
第3个回答  2010-06-15
用按键精灵的文件操作插件建立一个记事本。每次运行按键精灵时将记事本的值+1。然后读取该值控制键盘动作次数。
第4个回答  2010-06-14
二楼说的是对的

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网